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QUE É UM 
É: COMPUTADOR? 


Desde épocas imemoriais, o ho- 
mem tem inventado ferramentas e 
instrumentos para ajudá-lo a fazer 
milhares de coisas diferentes. Pode- 
mos imaginar a ferramenta como 
uma espécie de extensão dos senti- 
dos e dos músculos do ser humano. 
O que é um telescópio, por exemplo? 
Nada mais do que a ampliação do 
sentido da visão. Sem instrumentos e 
ferramentas, certamente o homem 
não teria atingido o grau de civiliza- 
ção que tem hoje, nem Pprogrediria 
tão depressa. 

Também o computador pode ser 
visto como uma espécie de ferramen- 
ta que o homem inventou para o aju- 
dar, ampliando os poderes de seu 





próprio cérebro. E usando o seu cére- 
bro que o homem é capaz de resol- 
ver problemas, decidir coisas e me- 
morizar informações. Com a ajuda 
do computador, entretanto, ele pode 
fazer cálculos complicadíssimos mui- 
to mais rapidamente do que com ou- 
tros meios. 

O computador também tem MEMO- 
RIA, ou seja, ele é capaz de guardar 
as informações e reutilizá-las. Essas 
informações, que são chamadas de 
DADOS, devem ser colocadas por 
um ser humano na memória do com- 
putador. 

Muitas vezes, os computadores são 
capazes de memorizar coisas que os 
homens não conseguem: listas lon- 
gas de nomes e de números, por 
exemplo. 

Um computador é capaz de achar 
rapidamente qualquer informação 
guardada em sua memória. Ele pode 
também comparar dados entre si, pa- 
ra mostrar, por exemplo, qual é o 
maior ou o menor. 

Tudo isso faz do computador uma 


ferramenta extremamente poderosa, 
um auxiliar indispensável do homem 
moderno, em um número enorme de 
atividades, nos bancos, nas empre- 
sas fornecedoras de energia, nas tele- 
comunicações, nas escolas etc. 





Entretanto, mesmo sendo tão pode- 
roso, o computador é uma máquina 
relativamente primitiva, quando com- 
parada com o cérebro humano. O 


computador não tem sentimentos, 
nem iniciativa própria. Ele só faz o 
que um ser humano mandar: essa 
pessoa é chamada PROGRAMA- 
DOR, e sua função é colocar no com- 
putador uma série de comandos ou 
instruções, que dizem exatamente o 


que a máquina deverá realizar. Esta 
série de ordens é chamada de PRO- 
GRAMA e, sem este, nenhum compu- 
tador funciona. 


computador 
é uma ferramenta 
universal 


Ds 





A grande vantagem do computa- 
dor sobre os outros instrumentos é 
que, com um só aparelho, podemos 
fazer muitas coisas diferentes. Para is- 
so, basta colocar um outro programa 
em sua memória, e ele lhe obedece- 
rá. Por isso, dizemos que o computa- 
dor é uma ferramenta universal. Hoje 
em dia, com os robôs (que são compu- 
tadores dotados de força e movimen- 
to), o número de coisas que se pode fa- 
zer é maior ainda. Portanto, sabendo 
programar um computador, você po- 
derá dominá-lo completamente. 






Cu 

Mh importante 
aprender 
programação? 





Em muitas profissões, o computa- 
dor é uma ferramenta de trabalho 
muito importante e necessária. 
Quem quiser estudar para engenhei- 
ro civil, por exemplo, e não souber 
computação, vai ser incapaz de cons- 
truir prédios grandes, estradas e tú- 
neis. Outras profissões, que ainda 
não usam muito o computador, usa- 
rão cada vez mais no futuro. Exem- 
plos: Medicina, Biologia, Educação, 
Direito, etc. Por isso é importante que 
todos aprendam alguma coisa sobre 
os computadores. E a 

É claro que nem todas as pessoas 
que usam computadores precisam sa- 
ber programá-los. Pode-se comprar 
um programa pronto, e bastará colo- 
cá-lo no computador e utilizá-lo devi- 
damente. Entretanto, só se consegui- 
rá dominar completamente o compu- 
tador se se souber programá-lo. Mui- 
tas vezes, não se achará um progra- 
ma feito por outros que realize exata- 
mente o que se quer. E, além disso, 
como se sabe, a programação de 
computadores é uma profissão cada 
vez mais valorizada e atraente. 

Até há quatro ou cinco anos a 
maioria das pessoas não tinha a me- 
nor chance de utilizar diretamente 
um computador no seu dia-a-dia. En- 
tretanto, com o progresso maravilho- 
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so da eletrônica, surgiram computa- 
dores cada vez menores e mais bara- 
tos, que hoje estão ao alcance de to- 
dos. Esses novos computadores, cha- 
mados de microcomputadores, estão 
entrando em todos os ramos da ativi- 
dade humana, e em breve serão tão 
comuns quanto os telefones e os auto- 
móveis. Devemos nos preparar para 
esse futuro! 


OMO É UM 
COMPUTADOR? 








Para entender como é organizado 
um computador, temos antes que 
examinar a maneira como ele é utili- 
zado. 

Podemos imaginar o computador 
como uma espécie de calculadora. 
Para efetuar um cálculo por meio de- 
la, precisamos primeiro fornecer-lhe 
os valores que serão utilizados nas 
contas. Isso é feito pelas teclas, que 
também são usadas para informar à 
calculadora quais serão as operações 
a realizar (soma, divisão etc.). Uma 
vez fornecidos os dados -e as opera- 
ções, a calculadora efetua os cálculos 
e mostra os resultados no visor. 

A forma de utilizar um computador 
não é muito diferente desta. Ele é for- 
mado por diversos elementos, cada 
um encarregado de uma função es- 


pecífica. 








ENTRADA: é a parte do computador 
que recebe os DADOS (números, le- 
tras) e o PROGRAMA (ordens e ope- 
rações). 


PROCESSADOR: é o elemento do com- 
putador que mostra os resultados. 

Um computador pode ter diferentes 
tipos de entradas e saídas, ao contrá- 
rio das calculadoras mais simples. 
Na maioria dos computadores peque- 
nos (chamados de microcomputado- 
res) estas são as partes responsáveis 
pelas três tareías: 


1) O TECLADO — parecido com o de 
uma máquina de escrever, é usado 





para informar ao computador os da- 
dos e as instruções ou comandos. Por- 
tanto, ele é o elemento de ENTRADA 
do computador. 


9) A UNIDADE CENTRAL DE PRO- 
CESSAMENTO — esse é o nome da 
calculadora que o computador tem 
em seu interior. Na maioria dos mi- 





crocomputadores, essa unidade está 
localizada na mesma caixa do tecla- 
do, e é formada por milhares de cir- 
cuitos eletrônicos de tamanho micros- 


cópico. Essa parte é o PROCESSA- 
DOR do microcomputador, e é tam- 


bém 
(UCP). 


conhecida pela abreviatura 


3) A TELA DE VÍDEO — a informação 
que for digitada (datilografada) no te- 
clado aparece ao mesmo tempo na 
tela de uma TV, ligada ao computa- 
dor: desse modo, pode-se ver o que 
se está fazendo. Quando o resultado 
estiver pronto, o computador tam- 
bém vai escrevê-lo na tela. Portanto, 
ela é o elemento de SAIDA do nosso 
computador. 

Outra parte importante do compu- 
tador é a MEMÓRIA, da qual já fala- 
mos acima. A memória do computa- 
dor é capaz de guardar ao mesmo 
tempo um certo número de informa- 
ções. Por exemplo, muitos microcom- 
putadores podem guardar até 48 000 
números ou letras em sua memória. 
Por isso se diz que eles têm uma me- 
mória de 48 K (o K significa quilo, ou 
1 000 vezes: portanto, 


48 x 1000 = 48 000). 


Não se vê a memória, a não ser 
que se abra a caixa do teclado. Esta 
é formada por milhares de circuitos 
microscópicos, do mesmo tipo que os 
do processador. 


que é um 


programa de 
computador? 


Os computadores recebem ordens 
em uma linguagem própria, diferen- 
te da nossa. Assim, você terá que 
aprendê-la, para conseguir se comu- 
nicar com ele. 

À linguagem que a maioria dos mi- 
crocomputadores é capaz de enten- 
der chama-se BASIC. Ela foi inventa- 
da nos Estados Unidos há cerca de 
vinte anos. Por isso, cada ordem ou 
comando na linguagem BASIC é 
uma palavra em inglês. Entretanto, o 
número desses comandos é peque- 
no, o que torna fácil decorá-los. Com 
algumas aulas, você já saberá usá- 
los como se fossem sua própria lin- 
guagem. Aprender BASIC é muito 
mais fácil que aprender qualquer 
idioma estrangeiro. 

* Eis um exemplo de comando sim- 
ples em BASIC: 


PRINT8+3 





Esta ordem ou comando do progra- 
ma tem o seguinte significado para o 
computador: 


ESCREVA O RESULTADO 
DA CONTA 8 + 3 


A palavra print quer dizer “escre- 
va, em inglês. 

Normalmente um programa é 
constituído de uma série de instru- 
ções ou comandos dados ao computa- 
dor. Ele realiza um de cada vez, na 
ordem em que eles forem fornecidos. 

Todo programa digitado no teclado 
do computador é, primeiramente, 
guardado em sua memória. Assim 
ele pode se lembrar do programa, e 
repeti-lo para nós, tantas vezes quan- 
tas quisermos. Essa é sua grande dife- 
rença em relação às calculadoras. 

Infelizmente, a memória do compu- 
tador se apaga ao desligarmos a for- 
ça. Todas as informações guardadas 
se perdem, inclusive o programa. 

Por esse motivo, seria bom ter uma 
maneira de guardar o programa em 
outro lugar, para que não se perca 
ao desligarmos o computador. Assim 
não será necessário digitar de novo 
todo o programa, ao ligarmos o com- 
putador. 

Os microcomputadores têm uma 
maneira muito simples de guardar es- 
ses programas: um gravador cassete 
comum. Através de um fio que liga o 
computador ao gravador, todas as 
instruções de um programa podem 





TESTE 


1.1. Marque V se for verdadeiro, ou 
F se for falso: 


() O computador é capaz de pen- 
sar sozinho. 

() O computador fica chateado se 
errar algum cálculo. 

() O computador não erra quando 
realiza algum cálculo. 

() O computador não tem memória. 

() O computador faz contas mais 
rapidamente que o homem. 

() O computador pode fazer coi- 
sas sem ser programado pelo 
homem, 


1.2. Defina com suas próprias pa- 
lavras: 


PROGRAMA: 
DADOS: 


1.3. Diga se concorda ou não com a 
seguinte afirmação, e por quê: 


UM DIA OS COMPUTADORES 
VÃO MANDAR NA HUMANIDADE 


1.4, Cite três trabalhos que o ho- 
mem faz com auxílio dos computa- 
dores: 


É 

2. 

3 po 

1.5. Escreva, na figura abaixo, os 


nomes das partes do microcompu- 
tador: 








1.6. Uma calculadora eletrônica co- 
mum é uma espécie de computador 


simplificado. Escreva na figura abai- 
xo quais são os elementos de EN- 
TRADA e de SAÍDA da calculadora. 





1.7. Qual a diferença entre o tecla- 
do de um computador e o de uma 
calculadora? 


1.8. Escreva para que serve cada 
parte do computador: 


TECLADO: 
TELA DE VÍDEO:: 

UNIDADE DE PROCESSAMENTO: 
MEMÓRIA: 


1.9. O que é memória auxiliar, e 
qual é o tipo de memória auxiliar 
que os microcomputadores mais co- 
muns utilizam? 


1.10. Marque V se for verdadeiro, F 
se for falso: 


() BASIC é uma linguagem de 
computador. 

() Um idioma estrangeiro é mais 
simples do que o BASIC. 

() O BASIC é uma linguagem in- 
ventada pelo homem. 

() Um computador só pode ser 
programado na sua própria lin- 
guagem. 

() Um programa é um conjunto de 
instruções ao computador. 

() O programa de computador pre- 
cisa ser guardado na memória. 

( ) Existe uma parte da memória 
do computador que não pode 
ser apagada. 


1.11, Explique o que significam pa- 
ra o computador os seguintes co- 
mandos em BASIC: 


PRINT 12 — 45 
PRINT29 + 3-8 ; 


1.12. Por que o microcomputador en- 
tende BASIC logo que você o liga? 


ser gravadas em uma fita cassete, 
quando você quiser. 

O computador grava essas informa- 
ções usando uma espécie de código 
Morse de alta velocidade. Quando 


COMO ESTUDAR BASIC 


O objetivo deste curso é ensinar 
você a programar microcomputado- 
res usando a linguagem BASIC. Pra- 
ticamente todos os microcomputado- 
res hoje existentes são capazes de 
entender essa linguagem: assim, O 
que você aprender aqui poderá ser 
aproveitado para vários tipos e mar- 
cas de computadores pequenos ou 
mesmo grandes. 

Entretanto, existem muitas varian- 
tes da linguagem BASIC, conforme 
a marca do computador: alguns co- 
mandos que existem em um compu- 
tador não existem em outro, ou en- 
"tão funcionam de modo diferente. Es- 
sas variantes são chamadas de “dia- 
letos”. Existem, por exemplo, diale- 
tos diferentes para os micros tipo 
TK-85, CP-500, TK-2000 etc. 


Em que computador estudar? 

Para que você aprenda melhor, 
sem ficar confuso com os diversos 
dialetos existentes, este curso ensi- 
nará apenas a variante do BASIC pa- 
ra os microcomputadores menores e 
mais baratos: TK-82C, TK-83, CP-200 
e Ringo Essas são marcas nacio- 
nais de microcomputadores, que fa- 
lam exatamente a mesma lingua- 
gem BASIC, e que são similares 
(compatíveis) com o microcomputa- 
dor inglês chamado Sinclair ZX-81 e 
o norte-americano Timex 100. 

Tudo o que você aprende aqui se 
aplica a todos os computadores des- 
sa linha, mas não a computadores 
de outras marcas. . 


“Diferenças entre os computadores 
Existem pequenas diferenças en- 


tre as diversas marcas indicadas. 


GRAVADOR CASSETE 





você quiser colocar de novo o progra- 
ma na memória do computador, bas- 
ta “tocar” para ele a fita gravada, e 
ele reconhecerá o programa, automar- 
ticamente. 


Neste curso não ensinaremos como 
montar ou ligar cada tipo de compu- 
tador: isso é facilmente encontrado 
nos manuais que acompanham os 
micros. Quanto à operação do tecla- 
do e do vídeo, as diferenças são as 
seguintes: 
— os computadores da Microdigi- 
tal (TK-82C, TK-83 e TK-85) têm exa- 
tamente o mesmo sistema de ope- 
ração e disposição das teclas. À 
única diferença é que o TK-82C e o 
TK-83 têm um teclado de membrar- 
na (sem partes móveis), ao passo 
que o TK-85 têm teclas mecânicas; 
— a tecla chamada de NEWLINE, 
nos computadores tipo TK, é cha- 
mada de ENTER, nos computado- 
res CP-200 e Ringo. Entretanto 
sua função é exatamente igual 
em todos; 
— a disposição do teclado CP-200 
e do Ringo é ligeiramente diferen- 
te da encontrada nos TK. 
CP-200 tem duas teclas SHIFT, ao 
invés de uma, e tem duas teclas 
RESET vermelhas, na parte supe- 
rior do teclado. O Ringo tem uma 
tecla de ENTER em uma disposi- 
ção diferente dos anteriores, mar- 
cada com uma flecha para baixo; 
— q forma como aparecem textos 
e gráficos na tela de TV também 
pode ser diferente. Nos computa- 
dores TK, as letras são escuras, so- 
bre fundo branco. No CP-200, nor- 
malmente é o contrário (letras 
brancas sobre fundo escuro), mas 
isso pode ser facilmente invertido. 
No Ringo, você pode mudar de 
uma cor para outra com o auxílio 
de um interruptor. 
Quanto ao restante da operação, 
todos os computadores funcionam 


“da mesma maneira. 


Assim, o gravador auxilia a memó- 
ria principal do computador e por is- 
so ele é chamado de “memória auxi- 
liar. 

À medida que você aprender BA- 
SIC, você também será capaz de en- 
tender os programas de computador 
escritos nessa linguagem. E poderá 
também começar a escrever outros 
programas — os seus programas! 

Quando você ligar o microcompu- 
tador, ele já estará pronto para acei- 
tar instruções em BASIC, digitadas 
por você no teclado. 

Ele sabe BASIC porque essa lin- 
guagem já vem gravada em uma me- 
mória especial, colocada na fábrica, 
dentro da caixa do teclado. Essa me- 
mória nunca se apaga, ao contrário 
da outra, que vai ser usada para co- 
locar os seus programas e dados. 


Um aviso importante: embora seja 
possível aprender programação sem 
computador, isso não é recomendá- 
vel. Este curso permite que você tes- 
te as lições e os programas e realize 
os exercícios e os testes em um com- 
putador qualquer, do tipo indicado 
aqui. Você verá que o seu rendimen- 
to será muito maior. 


Como utilizar este curso 
As lições do curso de BASIC são 

organizadas em capítulos, que irão 
apresentando os comandos e sua uti- 
lização em uma certa ordem. À não 
ser que você já conheça BASIC, nã 
tente pular capítulos, ou estudar fo- 
ra da ordem. Os capítulos são dividi- 
dos em seções distintas, cada um 
com três partes: 

— texto 

— exercícios 

— teste 


Você deve inicialmente ler o texto, 
seguindo atentamente todos os 
exemplos. Teste os exemplos dados 
no computador e veja os resultados. 
Tente modificar os programas, em 
seguida realize os exercícios propos- 
tos. Use sua imaginação e tente fa- 
zer programas, usando sua própria 

a. 

Finalmente, realize o teste e veja 
o seu desempenho. Se você errou 
muito ou não conseguiu responder a 
todas as questões, estude a seção 
mais uma vez. 

E lembre-se: não adianta apren- 
der uma linguagem qualquer, para 
depois não usá-la. Fatalmente você 
a esquecerá após um certo tempo. 
Durante e após o curso, use bastan- 
te o computador, sempre tentando 


“criar novos programas! 





C A P Í 


T U LO 
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OMO USAR O 
MICRO- 
COMPUTADOR? 








Agora que você já sabe como é o 
microcomputador, vamos aprender a 
operá-lo. 


ontagem do 
micro- 
computador 








As instruções completas para liga- 
ção do computador podem ser lidas 
no próprio Manual do equipamento. 
Aqui damos apenas algumas instru- 
ções gerais. 


1) Ligue primeiro o computador, por 
meio de um cabo apropriado, no lu- 
gar onde se liga a antena externa, 
no aparelho de TV. Se algum fio já 
estiver ligado nesse lugar deve ser re- 
tirado. 


2) Agora ligue o computador na toma- 
da. Nos computadores tipo TK, isto 
deve ser feito através de uma FONTE 
DE ALIMENTAÇÃO. 


3) Agora ligue o fio da TV em uma ou- 
tra tomada. 

Veja como deverão estar ligados 
os fios: 


ANTENA 


[0000000 


1a FONTE DE 


=| ALIMENTAÇÃO 


4) Agora ligue o aparelho de TV. Co- 
loque o seletor de canais no canal 2. 


5) Para ligar o computador use o in- 
terruptor marcado (LIGA-DESLIGA). 


6) Gire o botão de sintonia até obter 





a imagem de uma letra K na parte in- 
ferior da tela. 





7) Usando os botões de brilho e de 
contraste da TV, ajuste-os até que a 
letra K apareça o mais nitidamente 
possível na tela. 

Se você não conseguir enxergar 
bem a letra K, aperte algumas teclas 
do teclado. Veja como as letras que 
você apertou vão aparecendo na te- 
la. Assim ficará mais fácil acertar a 
sintonia. 

Se o computador já estiver monta- 
do, é muito mais simples colocá-lo 
em funcionamento: 

1) ligue o aparelho de TV. 

2) ligue o computador. 

Para desligar o computador, faça 
exatamente ao contrário: primeiro 
desligue o botão LIGA-DESLIGA, lo- 
calizado atrás da caixinha, depois 
desligue o botão de força do apare- 
lho de TV. 

Experimente agora ligar e desligar 
o computador uma, duas ou três ve- 
zes. Não fique com medo de danifi- 
car o computador com esse procedi- 
mento: ele é feito para suportar bem 
essas operações. Inicialmente não va- 
mos usar o gravador cassete, por is- 
so não é necessário aprender agora 
como ele é ligado ao computador. 

À primeira coisa que aparece na 
tela da TV, quando você liga o com- 
putador, é a letra K, dentro de um 
quadrinho preto, na parte de baixo 
da tela: 





Este quadrinho é chamado de CUR- 
SOR. Toda vez que ele aparecer na 
tela, no mesmo lugar, significa que o 
computador está pronto para aceitar 
suas ordens ou comandos, em lingua- 


gem BASIC. 


PARA DAR COMANDOS AO COM- 
PUTADOR USAMOS O TECLADO 


Olhe agora para o teclado. 


ERES 
FTTIIITTITTT 


nes =]ocfealcafual: | To To 
ES CE CE GE Cm Ol CE CE mm Es 





1) As teclas com letras e números 
têm a mesma disposição que as de 
uma máquina de escrever comum: 
Q W, E, R, T, Y, etc... Letras, algaris- 
mos ou sinais de pontuação estão es- 
critos numa mesma tecla. 

Ão conjunto de todas as letras e si- 
nais gravados nas teclas chamamos 
de CARACTERES DE TEXTO. 

2) Em cada tecla existem vários sím- 
bolos ou palavras, que são chama- 
dos RÓTULOS DA TECLA. Algumas 
teclas têm apenas 2 símbolos ou pala- 
vras, outras têm até 6. Olhe a tecla 
da letra P: 


PRINT 





TAB 


Você pode ver que o símbolo mais 
em cima de todos é PRINT. 

Logo abaixo dele, temos um sinal 
em vermelho: aspas. 

Finalmente, embaixo de todas, ve- 
mos a palavra TAB. 

Todos estes símbolos e palavras po- 
dem ser introduzidos (informados) ao 
computador, usando-se a mesma te- 
cla: a tecla da letra P. 

Mas como o computador sabe qual 
palavra ou símbolo nós vamos intro- 
duzir, se a tecla é uma só? 

Isto é muito simples. Vamos experi- 
mentar um pouco para você perce- 
ber como é feito. 

À postos? Muito bem: 

Pressione a tecla P uma vez. Não 
precisa apertar muito forte. Note que 
se ouve um sinal sonoro fininho quan- 
do se aperta a tecla. Ele é chamado 
de bip. 

Quando o computador soar o bip, 
quer dizer que ele aceitousaquilo que 
você quis transmitir a ele, ao pressio- 
nar a tecla. 

Olhe para a tecla agora: 

Veja como na parte de baixo apare- 
ceu a palavra PRINT. O cursor agora 
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foi deslocado para depois da palavra 
PRINT na tela, e ainda é um quadra- 
dinho preto. 

Mas note que agora a letra dentro 
dele é L] . 

ESTA”ÉE A PRIMEIRA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela tem a le- 
tra K dentro, ao pressionarmos a te- 
cla, a palavra ou símbolo que estiver 
bem em cima das outras é informada 
ao computador. Esta palavra é uma 
instrução ou comando ao computa- 
dor, na linguagem BASIC. 





dando ao 
uma ordem: ESCREVA. 
Mas escrever o quê? Precisamos 
dar a ele alguma outra informação. 
Pressione agora a tecla onde está 
o número 8. 
Veja o que ocorreu: 


Estamos computador 


| PRINT3IL 





O algarismo 3 apareceu na tela, 
depois da palavra PRINT e um espa- 
ço em branco. O cursor mudou de no- 
vo para um lugar logo após o núme- 
ro 3, e ainda tem a letra L dentro. 

Por isso que ele se chama CUR- 
SOR: ele mostra exatamente o ponto 
onde vai ser colocada mais uma ou- 
tra informação, se você pressionar 
uma tecla qualquer. ; 

ESTA É A SEGUNDA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela está com 
a letra L dentro, ao pressionarmos 
uma tecla, a letra ou número marca- 
do são informados ao computador. 

Agora pressione a tecla SHIFT, e 
pressione ao mesmo tempo a tecla K 
(podem existir duas teclas marcadas 
SHIFT: uma de cada lado do teclado, 
na fileira de baixo). | 

Veja como está a tela agora: 


PRINT 3 L 





Apareceu o sinal + (mais), logo de- 
pois do número 3, certo? Note que o 
cursor mudou de novo de lugar, indo 
para depois desse sinal de +. . 

ESTA É A TERCEIRA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela tem a le- 
tra L dentro, ao pressionarmos uma 
tecla, ao mesmo tempo que a letra 
SHIFT, a palavra, ou símbolo, locali- 
zada em segundo lugar (em verme- 
lho) é informada ao computador. Es- 
ta palavra também é um comando 
ou instrução em BASIC, mas, depen- 
dendo da tecla pode ser também um 
sinal qualquer. 

Neste caso, o sinal + indica ao 
computador uma operação matemáti- 
ca: a soma. 

Agora pressione a tecla marcada 4: 





Na tela apareceu o número 4, logo 
depois do sinal de soma. 

Estamos dando uma ordem ao com- 
putador: 

PRINT 3 + 4 
que em português significa: 
ESCREVA O RESULTADO DE 3 MAIS 4 

Só que o computador ainda não 
obedeceu à nossa ordem. Por quê? 

Acontece que ele ainda não sabe 
se nós terminamos de digitar o co- 
mando completamente. No exemplo 
que estamos estudando, pode ser 
que eu quisesse somar outros núme- 
ros ao 3 ou 4, certo? 

Para informarmos ao computador 
que o nosso comando já está comple- 
to e pode ser obedecido, pressiona- 
mos a tecla 

NEW LINE. 

Esta tecla significa introduzir, em 
português. Com isso, estamos intro- 
duzindo o comando que digitamos 
antes, e que está escrito na parte de 
baixo da tela, no computador. E ele 
poderá obedecer. 

Pressione a tecla NEW LINE; veja o 
que acontece: 





A tela fica toda preta, e depois de 
uma pausa bem pequena (o compu- 


tador está calculando o resultado) 
aparece no alto da tela o número Es 

O número 7 é o resultado da opera- 
ção 3 + 4, efetuada pelo computa- 
dor, e ele é escrito na tela com o co- 
mando que você introduziu pelo te- 
clado: PRINT. 

Na parte de baixo aparecem os nú- 
meros 0/0. 

Isto significa que o computador 
não achou nenhum erro no comando 
que você introduziu. Isso às vezes po- 
de acontecer! 

Mais tarde vamos explicar direiti- 
nho o que significa isso. 

Se você digitou errado alguma coi- 
sa na tela, e não sabe como apagá- 
la, pode desligar o computador. Tor- 
ne a ligá-lo após alguns segundos, e 
comece tudo de novo. 

Não se preocupe que isso não vai 
prejudicar o computador, nem mu- 
dar os ajustes já feitos na TV. 

Após terminarmos o último exercí- 
cio a tela estava assim: 





Para voltar novamente o cursor K 
à tela, pressione a tecla NEW LINE: 





O computador está pronto para 
aceitar outros comandos. 
























Resumo 

Até agora vimos que existem dois ti- 

de cursores: “” 

indica que o computador aceitará 
uma ordem ou comando, quando for 
pressionada uma tecla. 

A instrução ou comando são pala- 
vras da linguagem BASIC, marcadas 
na parte superior do teclado, acima de 
cada tecla. 

Exemplos de instruções em BASIC: 

EDIT STOP 


PRINT CLS 

Localize cada uma destas palavras 
no teclado, 

Se a palavra desejada estiver escrita 
em vermelho, a tecla SHIFT deverá ser 

ressionada ao mesmo tempo. 

indica que o computador aceitará 

uma letra, número ou sinal marcados 
em vermelho, a tecla SHIFT deverá ser 
pressionada ao mesmo tempo. 


omo corrigir 
erros de 
digitação 








Os erros que surgirem durante a di- 
gitação de uma linha podem ser cor- 
rigidos antes que pressionemos a te- 
cla NEW LINE. 

Para isso, usamos a tecla sobre a 
qual está escrito RUBOUT, no canto 
superior direito do teclado. RUBOUT 
quer dizer CANCELAR, em portu- 
guês. 

Para usar a tecla RUBOUT, deve- 
mos pressionar ao mesmo tempo a te- 
cla SHIFT, e a tecla O (zero). Note que 
a palavra RUBOUT está marcada em 
vermelho acima da tecla com o nú- 
mero 0. Por isso temos que usar a te- 
cla SHIFT. 

Cuidado! Se você esquecer de 
apertar a tecla SHIFT, fará aparecer 
na tela o número 0, ao invés de can- 
celar. 


Vamos seguir um exemplo: 
Vamos supor que você quer digitar 
o seguinte comando: 


PRINT 3 + 25 
Mas errou, e digitou: 
PRINT 4 + 25 


Introduza esse comando pelo te- 
clado: 

O cursor na tela está marcado K1 

Pressione a tecla P: aparece PRINT 
e o cursor muda para |L). 

Pressione a tecla 4: aparece o nú- 
mero 4. 

Pressione a tecla K juntamente 
com SHIFT: aparece o sinal + 

Pressione as teclas 2 e 5: aparece o 
número 25. 

Ágora, queremos corrigir o núme- 
ro 4, mudando-o para 8. 

Existem duas maneiras de se fazer 
isso: 


PRIMEIRA MANEIRA DE CORRIGIR 
UMA LINHA 





Pressione a tecla SHIFT, e a mante- 
nha abaixada com o dedo. 


Agora pressione a tecla RUBOUT 
uma vez. Veja que o cursor L volta pa- 
ra trás, e apaga da tela o número 5. 





Repita a operação (SHIFT e RU- 
BOUT) por mais três vezes. 

Veja que fica na tela somente o co- 
mando PRINT que você tinha digitado: 





Depois que todos os números esti- 
verem apagados, pressione nova- 
mente as teclas 3, +, 2e 5. Veja que 
o comando ficou como você queria: 





Pressione a tecla NEW LINE para 
ver o resultado. 


SEGUNDA MANEIRA DE CORRIGIR 


Às vezes, quando o comando é 
muito comprido, não vale a pena 
apagar tudo para corrigir alguma coi- 
sa bem no começo. 

E possível voltar até onde estava o 
erro, sem ser preciso apagar. 


Observe o teclado de seu TK-85. 

À tecla 5 tem, na parte de cima, uma 
flechinha virada para a esquerda. 

E a tecla 8 tem uma flechinha vira- 
da para a direita. 


—L —> [E 


[5] 


Com essas duas teclas, podemos 
mover o cursor para trás e para dian- 


te, na linha de comando, para corri- 


gir o que quisermos. 


TESTE 


2.1. O que devemos fazer para ligar 
um microcomputador? 














2.2. Desenhe aqui o que aparece na 
tela, quando o computador é liga- 
do: 





2.3. Defina com suas próprias pala- 
vras: 

CURSOR: 

CARACTERES DE TEXTO: 
RÓTULOS DA TECLA: 

BIP: 










2.4. O que significa para o computa- 
dor, quando o cursor está com as le- 
tras: 


E) : 
[L): 


2.5. Cite as três coisas para que ser- 


ve uma tecla do microcomputador 
que você já conhece: 













2.6. Sem usar o computador, escre- 
va qual será o resultado dos seguin- 
tes comandos: 

a. PRINT 345 — 12 + 8 
b. PRINT 968 — 234 + 2 





2.7. Que tecla devemos pressionar 
para aparecer de novo a tela com o 
cursor K, depois de ter sido mostra- 
do o resultado de um comando 
PRINT? 





2.8. Que tecla devemos pressionar 
quando queremos introduzir no com- 
putador algum caracter ou palavra 
marcado em vermelho na tecla? 





2.9. Que tecla devemos pressionar 
para que o computador realize o cál- 
culo dentro de um comando PRINT? 


2.10. Faça um desenho mostrando 
como se ligam entre si as partes de 
um computador (vídeo e teclado): 


Vamos seguir um exemplo para 
ver como ambas funcionam. 
Suponhamos que você queira es- 
crever este comando: 
- PRINT 65 + 47 
E errou, escrevendo: 
PRINT 25 + 47 
Escreva este comando no computa- 


dor: 





Veja como o cursor fica no final da 
linha de comando. Para apagar ape- 
nas o número 2 (errado), sem apagar 
os outros, usamos a flechinha volta- 
da para trás «—: 

Aperte SHIFT e a tecla à ao mesmo 
tempo: 





Veja como o cursor voltou a ficar 
entre os números 4 e /: 

Agora torne a pressionar as teclas 
5 e SHIFT mais 3 vezes. 

Cuidado para não esquecer de 
pressionar SHIFT, que fará aparecer 
o número 5 na linha! 





Agora o cursor está exatamente de- 
pois do número que queremos corri- 
gir. Pode pressionar a tecla RUBOUT 
(não se esqueça que isto se faz pres- 
sionando ao mesmo tempo as teclas 


SHIFT e 0): 





Para introduzir o número correto, 
basta pressionar a tecla com o núme- 
ro 6. Veja como o 6 entra perfeitamen- 
te: 





Se agora você quiser ver o resulta- 
do do comando, pressione a tecla 


NEW LINE. 


A TECLA NEW LINE PODE SER 
PRESSIONADA COM O CURSOR EM 
QUALQUER POSIÇÃO. 


Entendido? 


Se você apertou a tecla com a fle- 
chinha <- muitas vezes, pode aconte- 
cer que o cursor vá para o começo 
da linha: 





Para fazê-lo voltar até a posição 
correta, pode usar a tecla com a fle- 
chinha para a direita —, que é usa- 


da pressionando-se ao mesmo tempo 
as teclas SHIFT e 8: 





Note que a palavra PRINT é “pula- 
da” de uma vez só, quando se aperta 
uma das teclas com flechinhas. 

Experimente apagar com RUBOUT 
a palavra PRINT. Note que ela tam- 
bém é apagada de uma só vez. 








Introduza no computador as linhas de co- 
mando abaixo, uma de cada vez, e pressio- 
ne a tecla NEW LINE para ver o resultado. 

Olhe bem para a linha antes de pressio- 
nar a tecla NEW LINE. 


1) PRINT 43 + 65 

2) PRINT 235 — 123 

3) PRINT 49 + 22 — 3 

4) PRINT 894 — 425 + 11 

5) PRINT 123 + 456 + 789 — 56 
6) PRINT 11 + 45 — 234 — 123 
7) PRINT 9 + 12 — 78 


8) Introduza um comandó para realizar a so- 
ma dos números 12, 24 e 33 


9) Se o Zico já fez 765 gols, quantos faltam 
para completar 1000? 


10) Introduza um comando para somar as 
idades de três amigos seus. 


Agora introduza as linhas de comando 
abaixo, uma de cada vez. Antes de pressio- 
nar a tecla NEW LINE, corrija a linha de co- 
mando, usando as teclas € > e RUBOUT, 
de modo a ficar igual à segunda linha. De- 
pois pressione a tecla NEW LINE e anote o 


resultado: 


45.5 


PURIABA IA ESPERA! Fr ESTRATREÃ LIES PASO PARE de Se Rd: Pk , E ED 
'f / UM 4 ai cais, y VA o, is 
ATA A VR re) MPR AI PRO rp o RPPN REAR SPSS SRS PRP RE NS 
y PLAN USADO, ido ef DU od RP RIA o PPS Ar / 
fed sé Psddedods Ass ASI SDS PAPER 





Errado Certo Resultado 

11) PRINT 957 + 125 PRINT 957 + 124 
12) PRINT23 - PRINT 23 + 

13+45 13 + 45 
13) PRINT 462 + PRINT 562 — 

234 — 12 234 5 12 
1PRINTIZ3-  PRINTIZIS + 
Mo old 12+85 
15) POKE 43 + PRINT 43 + 12 

12-55 -55 
16) POKE 23412 + — PRINT3MI + 998 A 
17) PRINT 1213 — PRINT 1213 + 

2342 345 — 2342 
19) PRINT 1.234 — PRINT 12.34 - | 

45.5 


ml NM] 


rros que O 
computador 
acusa 








O computador não aceita coman- 
dos que estejam escritos de forma er- 
rada para ele. Se isso acontecer, ele 
mostra na tela o erro, e espera que 
você o corrija. 

Introduza no computador a seguin- 
te linha: 

PRINT 23 + + 34 


À tela fica assim: 





Observe que até agora o computa- 
dor ainda não notou nenhum erro. 

Pressione agora a tecla NEW LINE, 
para que o computador realize o cál- 
culo. 

Note o que aconteceu: 





Apareceu outro quadradinho, se- 
melhante ao cursor, mas com a letra 
S dentro. 

Mesmo sendo parecido, o S não é 
um cursor. Ele é uma mensagem de 
erro, escrita pelo computador para 
avisar que você escreveu algo erra- 
do no comando (no caso, dois sinais 
+ + em seguida). 

Note que o S fica exatamente de- 
pois do primeiro sinal. Isso quer dizer 
que o computador indica que o se- 
gundo sinal está errado (está sobran- 


do). 


O ERRO SÓ FOI NOTADO PELO 
COMPUTADOR AO SE PRESSIONAR 
NEW LINE 


S indica um erro de sintaxe. Sinta- 
xe quer dizer forma correta de escre- 
ver um comando para o computador. 

À linguagem BASIC é inuito sim- 
ples, mas o computador não vai en- 
tender nada que for escrito fora das 


regras dessa linguagem. Felizmente 
ele indica o erro, para que possamos 
corrigi-lo. 

Enquanto você não corrigir esse er- 
ro, o computador não obedece ao co- 
mando. 

Experimente pressionar NEW LINE 
de novo. Note que o computador in- 
siste na mesma mensagem e não 
obedece a um comando errado. 

Para corrigir o comando errado, 
use as teclas < e RUBOUT, exata- 
mente como você treinou antes. 

Note que, ao pressionar a tecla — 
para voltar ao local do erro, a mensa- 
gem'S desaparece. O computador re- 
conheceu que você está querendo 
corrigir a linha, e retirou a mensa- 
gem para não atrapalhar. 





Ágora apague o segundo sinal + 


com RUBOUT: 





E pressione NEW LINE para ver o 
resultado: 





Agora o computador aceitou a li- 
nha de comando. 








TESTE 


3.1. Qual é a tecla usada para apagar al- 
guma letra ou número da tela? 






ATENÇÃO! Nos exercícios seguintes não 
use o computador! 


3.2. Suponhamos que foi introduzida es- 
ta linha no computador: 
PRINT 123 + 456 
a. Escreva como ficará a linha se eu 
pressionar RUBOUT três vezes: 
b. E, agora, se em seguida eu pressio- 
nar as teclas 2, 3e 5. 
c. E, agora, se eu pressionar a tecla 
NEW LINE: 















3.3. Suponhamos que foi introduzida es- 
ta linha no computador: 

PRINT 325 + 459 

a. Escreva como ficará a linha, se eu 
pressionar a tecla <- duas vezes: 

b. E, agora, se eu pressionar a tecla <— 
mais uma vez: 

c. E, agora, se eu pressionar a tecla — 
por duas vezes, depois a tecla RUBOUT 
uma vez, e depois o número 5: 

d. E como ficará o resultado, se agora 
eu pressionar NEW LINE: 
















3.4. Diga o que está errado nos seguin- 
tes comandos: 

a. PRINT 345 + + 825 

b. PRINT 34]902 

c. PRINT PRINT 345 









3.5. O que significa a mensagem 8? 





3.6. O que acontece com a mensagem S, 
quando eu pressiono RUBOUT,<= ou => 









3.7. Que tecla temos que pressionar para 
o computador verificar se existe algum 
erro na linha de comando? 










Introduza as linhas de comando 
abaixo, uma de cada vez. Note que ca- 
da uma delas tem um erro. Anote o er- 
ro que você acha que a linha tem, an- 
tes de introduzi-la no computador. 


Errado Qual é o erro? 
1) PRINT 45 + — 25 


2) PRINT 23 — — 2 


Agora pressione a tecla NEW LINE. 
Veja onde aparece a mensagem S. 
Corrija, e pressione NEW LINE de no- 
vo. Anote o resultado. 


Resultado ” 





Cc A P | 


E COMPUTADOR 





E UMA 


a CALCULADORA! 


Como você viu, usando a instrução 
PRINT, nós podemos fazer contas 
com o computador. Até agora, só 
aprendemos a fazer somas e subtra- 
ções bem simples, como 

PRINT 34 + 20 

Agora vamos aprender como fazer 
contas bem mais complicadas. Você 
vai ver que o seu microcomputador 
pode achar o resultado de sentenças 
ou expressões matemáticas, com to- 
dos os tipos de operações (inclusive 
multiplicação e divisão). 

PARA USAR O (COMPUTADOR 
COMO UMA CALCULADORA, PRE- 
CISAMOS SEMPRE COLOCAR UM 
COMANDO PRINT ANTES DA EX- 
PRESSÃO MATEMÁTICA. 

Esse modo de operação é chama- 


do de MODO DIRETO. 


ultiplicação 
8 he Divisão 


DO E 

Você já aprendeu que usamos os si- 
nais + (mais) e — (menos), para orde- 
nar ao computador que faça uma so- 
ma ou uma subtração. 

Isso quer dizer que O computador 
usa os mesmos sinais que aprende- 
mos em Matemática. 

Mas, para a multiplicação e a divi- 
são, a operação é um pouco diferen- 
te na linguagem BASIC: 

A MULTIPLICAÇÃO USA O SINAL 
* EM VEZ DE X 

é DIVISÃO USA O SINAL / EM VEZ 
DE + 

Por exemplo: 

Quanto é 34 multiplicado por 2? 

Digite a linha PRINT 34 + 5 no tecla- 
do, e aperte a tecla NEW LINE: 

Vai dar o resultado: 170 

Outro exemplo: 

Quanto é 14 dividido por 3? 

Digite a linha PRINT 14/3 no tecla- 
do, e aperte a tecla NEW LINE: 





Dn 





T UU LO 


Vai dar o resultado: 






Por que o computador não aceita 


os sinais x e +, como na Matemáti- 
ca? Você mesmo pode imaginar por 
quê: 

O sinal de vezes (x) pode ser con- 
fundido com a letra x 

O sinal de dividir (+) não existe no 
teclado. 

Mas por que não posso usar O sinal 
: para a divisão? À resposta é igual à 
anterior: o computador o confundiria 
com dois pontos. Dois pontos e a le- 
tra x significam outras coisas para o 
computador, por isso não podem ser 
usados. Certo? 


Vamos fazer alguns exercícios de 
multiplicação e divisão no computa- 
dor, usando a instrução PRINT. Po- 
nha a resposta ao lado, e também o 
resultado da expressão (use o com- 
putador!): 





Ç.,, 


e | 
9. Uma hora tem 360 segundos. 
Quantos segundos tem um dia? 
Resposta: 


10. Meu pai me dá Cr$ 30 000,00 de 
mesada. Quanto eu ganho por dia? 
Resposta: 


11. Invente cinco exercícios usando 
divisão ou multiplicação de núme- 
ros: 


a 
b. 


A 


Pa 


ombinando 
operações 


O 
A linguagem BASIC consegue fazer 
contas contendo várias operações 
matemáticas misturadas: somas, sub- 
trações, multiplicações e divisões. E 
só colocar na instrução PRINT os nú- 
meros e operações que desejarmos, 
exatamente como em uma fórmula. 


Por exemplo: 


3+5/4 


Uma combinação como esta é cha- 
mada de expressão aritmética, por- 
que tem apenas números e opera- 
ções aritméticas. Existem outros tipos 
de expressões, que você irá apren- 
der depois. 

Vamos resolver um probleminha, 
como exemplo: 


Paulo tem 25 moedas de 5 cruzei- 
ros e 14 notas de 200 cruzeiros. Qual 
o total de dinheiro que ele tem? 


SOLUÇÃO 


Como em todo problema matemáti- 
co, primeiro vamos escrever a senten- 
ça que dá a solução: 

total = 25 x 0.50 + 14 x 200 


A instrução em BASIC para o com- 
putador fica assim: 


PRINT 25 + 0.50 + 14 * 200 


Coloque no computador e veja o re- 
sultado. Qual foi? 


a OMO O 
COMPUTADOR 


FEZ ESSA CONTA? 





Observe que, para acertar nesta con- 
ta, precisamos primeiro fazer as mul- 
tiplicações: 


25 x 0.50 + 14 x 200 
1.25 + 2800 
2801,25 


Ou seja, existe uma ORDEM DE 
REALIZAÇÃO das operações: a multi- 
plicação é sempre realizada antes de 
uma soma ou subtração. Se tivésse- 
mos somado antes, o resultado sairia 
errado. 

Como em Matemática, a lingua- 
gem BASIC também faz contas se- 
guindo uma certa ordem (chamada 
ORDEM DE PRECEDÊNCIA, porque 
algumas operações devem preceder 
outras, ou seja, serem feitas antes). 
Preste bem atenção nessas regras: 


1. AS DIVISÕES SÃO SEMPRE FEI- 
TAS EM PRIMEIRO LUGAR 


2. AS MULTIPLICAÇÕES SÃO REALI- 
ZADAS DEPOIS DAS DIVISÕES 


3. AS SOMAS E SUBTRAÇÕES SÃO 
FEITAS EM ULTIMO LUGAR 


Vamos fazer algumas contas no 
computador, usando a instrução 


1. À altura do King-Kong foi medi- 
da (depois de morto), sendo igual a 
37 pés e 8 polegadas. Quantas pole- 
gadas ele tinha de altura? 


SOLUÇÃO: 

Um pé (no sistema norte-america- 
no de medidas) tem 12 polégadas 
Altura = 12x37 +68 
PRINT12+37+8 


Coloque no computador e anote o re- 

sultado. Qual é a operação que o 

computador irá realizar primeiro? 
Resposta: 


2. O comprimento do monstro de 

Loch Ness é de 50 pés e 5 polegadas. 

Quantos centímetros ele mede? 
SOLUÇÃO: 


Veja agora que eu tenho que fazer 
uma expressão mais difícil. Primeiro 
eu multiplico 50 pés por 12 e somo 5, 
para ter o resultado em polegadas. 
Depois multiplico tudo por 2.54, que 
é o valor de uma polegada em centí- 
metros. 


Se eu fizer: 
PRINT 50 * 12 +5+2.04 
vai dar errado, pois primeiro o compu- 
tador vai realizar a multiplicação de 5 
por 2.94. Para evitar isso, posso usar 
parênteses, como na Matemática: 
PRINT (50 + 12 + 5) + 2.54 
Ágora vai dar certo, pois primeiro 
o computador faz as contas dentro 
dos parênteses. Depois multiplica o 
resultado por 2.94. 
Tente fazer no computador este 
exercício. 
Resposta: 


3. O jogador Zico tinha 300 000 déó- 
lares no banco. Depois recebeu co- 
mo luvas metade de 456 784 dólares, 
menos o imposto de 40 000 dólares. 
Quantos cruzeiros ele terá no total? 
(Imagine que 1 dólar valia, na épo- 
ca, 9096 cruzeiros.) 

SOLUÇÃO: 


O total de dólares no banco será: 
PRINT 300 000 + (456 784 — 40 000)/2 
ATENÇÃO: Como você já deve ter 
notado, não se usa nas calculadoras 
o ponto para separar centenas, mi- 
lhares etc., quando se coloca um nú- 
mero no computador. O ponto é usa- 
do pela linguagem BASIC como uma 
vírgula (para separar a parte inteira 
da parte fracionária de um número). 
Esse é o sistema usado nos Estados 
Unidos, onde a linguagem BASIC foi 
inventada. 

Para obter em cruzeiros, multiplica- 
mos tudo por 556. Para formar ape- 
nas uma expressão, temos que usar 
outros parênteses: 

PRINT (300 000 + (456 784 — 40 000)/2) 
* 596 

Coloque no computador e veja 

qual é o resultado. | 


Resposta: 


Ágora você aprendeu uma coisa 
importante: |. 

A EXPRESSÃO MATEMÁTICA PO- 
DE CONTER PARÊNTESES DENTRO 
DE P NTESES 
e parênteses dentro de parênteses 
dentro de parênteses... quantos se 
quiser usar. 

Está vendo como é parecido com o 
uso de chaves e colchetes, que você 
aprendeu em álgebra? 

Só há uma diferença: o computa- 
dor usa sempre parênteses. À lingua- 
gem BASIC não aceita colchetes ou 
chaves. 

Por isso algumas expressões po- 
dem ficar muito confusas, e você po- 
de esquecer de colocar algum parên- 
tese, ou colocá-lo errado. 

Lembre-se da seguinte regra: 

O NÚMERO DE PARÉÊNTESES À DI- 
REITA DEVE SER IGUAL ÃO DE PA- 
RÊNTESES À ESQUERDA. 


Depois de escrever a expressão, 
conte o número de parênteses. Se 
eles não forem pares, há um erro em 
algum lugar. 





l. Escreva a instrução PRINT para 
as expressões matemáticas abaixo 
(depois coloque no computador e 
anote o resultado): 

a. 4787:2 + 455 x 855 

b.12+ 34 + 45x 0.5 

c.M2+4+87:8 

d. 35.4 + 75 — 42 


89 — 68 
e. (12.8-5.6 x 45) 


2 
t. (35-7) — (45-8) x 1.7 
2 2 


2. Assinale o que está errado nas ex- 
pressões abaixo. Depois coloque no 
computador e anote o resultado. 

a. PRINT 45 + (63 — 12 

b. PRINT 83 + 45)/ 22 

c. PRINT (23.45 + 34.2/8 — 3)) 

d. PRINT 34.5 * 12 — 3,44 

e. PRINT (33 — [22 + 11)/2 

f. 895 — 43.3 + 12 


3. Um carro tinha 25.6 litros de com- 
bustível no tanque. Depois de uma 
viagem, ficou apenas com 17.3. Se o 
litro de gasolina custasse 1 688 cru- 
zeiros, quanto custaria a gasolina 
gasta na viagem? 

Resposta: PRINT 

Resultado: 


4. O Palmeiras fez 25 gols no campeo- 
nato e levou 13 gols. Cada gol a fa- 
vor vale 5 pontos positivos, cada gol 
contra vale 7 pontos negativos. Com 
quantos pontos ficou o Palmeiras? 
Resposta: PRINT 

Resultado: 


5. Quantos segundos tem um ano? 
Resposta: PRINT 
Resultado: 


6. Qual é a média das notas 5.6, 8.2 
e 7.5? 

Resposta: PRINT 

Resultado: 


Nem sempre o seu computador vai 
mostrar a resposta do modo como vo- 
cê quer. Preste bem atenção nos 
exemplos seguintes e entenderá por 
quê. 

Experimente colocar no computa- 
dor a seguinte expressão: 

PRINT 2/3 
Veja como ficou a resposta: 





Você deve saber que o resultado 
desta conta tem um número infinito 
de 6 depois do ponto: 
0.66666666066060666606006... etc. 

O computador mostrou apenas 6 
casas decimais. Além disso, ele colo- 
cou um 7 na última casa decimal. Is- 
to é feito sempre que a sétima casa 
for igual ou maior do que 5, e se cha- 
ma ARREDONDAMENTO. 

Suponha que o resultado de uma 
operação é 1.3411123443. O que o 
computador mostrará na tela? 

Resposta: 

Agora suponha que o resultado é 
123.5555. O que o computador mos- 
trará na tela? 

Resposta: 

O computador sempre vai mostrar 
um máximo de 6 algarismos. À não 
ser que haja menos de 6, quando 
mostrará apenas esses. 

Por exemplo: digite a instrução: 

- PRINT 2/4 
O resultado mostrado pelo compu- 
tador na tela é: 
0.5 
Note que ele não mostra: 
O. 500000 

Todos os zeros depois do o não são 

mostrados. 


unções 
matemáticas 





O SUR O DS RA E 


Além das quatro operações aritmé- 
ticas (soma, subtração, divisão e mul- 
tiplicação), o computador consegue 
fazer outros tipos de cálculos mais 
complicados. 

Por exemplo, se quisermos que o 
computador extraia uma raiz quadra- 
da de um número qualquer, ele con- 
segue fazer isto através da lingua- 


gem BASIC. 
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Para isso usamos uma instrução es- 
pecial, chamada FUNÇÃO. 

No nosso exemplo, a função que 
queremos calcular é a raiz quadra- 
da. Em BASIC, pedimos ao computa- 
dor para calcular a raiz quadrada 
por meio da abreviação SQR (que 
vem do termo SQUARE ROOT, que 
quer dizer raiz quadrada, em inglês). 

PRINT SQR 16 

Note que devo colocar as coisas 

em uma certa ordem, na instrução: 


PRINT é o comando que diz ao computa- 
dor: mostre o cálculo feito. 

SQR indica ao computador que o cálcu- 
lo que eu quero fazer é uma raiz quadra- 
da. Este é o nome da função. 

16 diz ao computador qual é o número 
do qual vai ser tirada a raiz quadrada. 
Ele é chamado argumento da função. 


Experimente digitar essa linha no 








computador. 
l. Para introduzir a instrução 
PRINT, pressione a tecla P: 
a E Re cu 






2. Para introduzir a função SOR, 
veja que ela está indicada em cima 
da tecla H. Mas o cursor na tela é o 
L. Isto quer dizer que, se apertarmos 
a tecla H, aparecerá a letra H, lem- 
bra-se? Para aparecer a função SQR, 
devemos antes pressionar a tecla 
SHIFT, bem como a tecla NEW LINE. 


Pressione e veja o que acontece: 


Citatapalo oo a PR 

O cursor mudou para F. 

Isto quer dizer que, se eu apertar a 
tecla H, aparecerá o que está indica- 
do logo acima da tecla (a função 
SQR), e não a letra H. 

Toda vez que eu quiser introduzir 
no computador uma função, tenho 
que transformar o cursor na tela pa- 
Te E. 

Isto é feito ordenando-se uma 
FUNCTION, que se consegue pressio- 
nando-se SHIFT e NEW LINE, ao mes- 
mo tempo (note que FUNCTION está 
escrito em vermelho, acima da tecla 
NEW LINE). 

Pressione agora a tecla H, e veja o 
que acontece: 





Note que o cursor voltou a ser L no- 
vamente. 

Isto quer dizer que o computador 
está esperando que você introduza o 
argumento (número): 





Pressione NEW LINE e veja o resul- 
tado do cálculo: 





Experimente realizar no computa- 
dor os exercícios abaixo. Escreva a 
instrução PRINT e coloque o resulta- 
do ao lado: 

a. 20 

b. 10 

c. 100 

d. 3.14159 

e. 2 


Uma função matemática também 
pode ser colocada dentro de uma ex- 
pressão aritmética: 

PRINT 25 + SQR 19 

O computador vai calcular primei- 
ro a função, antes de realizar a so- 
ma. Isso quer dizer que calcular uma 
função vem antes, na ordem de pre- 
cedência. 

Coloque no computador e veja o re- 
sultado. 

Outro exemplo: 

PRINT SQR 25 + SQR9 

O resultado é 8, porque o computa- 
dor calcula primeiro o resultado das 
duas funções, depois soma os resulta- 
dos. 

Agora, se eu fizer: 

PRINT SQR (25 + 11) 

O resultado será 6, certo? 

O uso dos parênteses forçou o com- 
putador a fazer primeiro a conta 25 + 
11 e só depois tirar a raiz quadrada. 


Para treinar, vamos fazer o seguin- 
te exercício: 


Elenice atravessou um campo de 
futebol com 100 m de comprimento 
por 40 m de largura (veja o desenho 
ao lado). Quantos metros ela teve 
que andar? 


SOLUÇÃO: 

O problema é de geometria. Um 
triângulo como o da figura tem a se- 
guinte expressão para calcular a hi- 
potenusa a partir dos catetos (teore- 
ma de Pitágoras, lembra-se?): 


A = Bº+Qº 


Então, a instrução PRINT para re- 
solver o problema é simplesmente: 


4.1. Escreva os símbolos usados em 
BASIC para as seguintes operações 
aritméticas: 

a. adição 

b. subtração 

c. multiplicação 

d. divisão 


4.2. Por que não são usados os sím- 
bolos x e : para multiplicação e di- 
visão em BASIC? 

Resposta: 


4.3. Numere as operações aritméti- 
cas, de acordo com a ordem em que 
são efetuadas, dentro de uma ex- 
pressão em BASIC: | 


Subtração 
Multiplicação 
Divisão 
Adição 


4.4. Coloque as expressões abaixo 
em forma de PRINT: 

a 3x2+2 

b. 3x (2 + 2) 

c. 4x5-9 

d. 3:2 

e. (5+4)x(5:9)-1 

É (5:M)x0+D-(1:2) 


4.5. Faça os seguintes exercícios uti- 
lizando o comando PRINT. Primeiro 
escreva a linha de instrução formu- 
lando o problema, depois coloque 
no computador e anote o resultado. 


EX ERA 


Veja que B*B é a mesma coisa do 
que Bº 

Existe também uma outra manei- 
ra de representar um expoente em 
BASIC: é através do sinal ++ (dois as- 
teriscos). Ele está em cima da letra 
H, e, para conseguir colocá-lo na te- 
la, basta apertar a tecla SHIFT junta- 
mente com a tecla H. 


Tente: 
PRINT SQR (B+:2 + C++2) 


Cuidado para não apertar a tecla 
* duas vezes: na tela vai aparecer a 
mesma coisa, mas o computador 
não vai aceitar. Tem que apertar a 
tecla que dá dois asteriscos de uma 
vez. OK? 


TESTAR 


a. Qual é a área de um triângulo 
de base 120 e altura 25? (Dica: 

= BASE x ALTURA.) 
Resposta: 





b. Qual é a soma das áreas de um 
triângulo de base 32 e altura 44 e 
um quadrado de lado 24? (Utilize 
apenas uma instrução PRINT.) 
Resposta: 


c. Qual é o volume de um cubo 
com 32,8 cm de aresta? 
Resposta: 


d. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 
36 polegadas. Qual é o comprimen- 
to do campo em centímetros e em 
metros? (Dica: uma polegada vale 
2,54 cm.) 

Resposta: 


e. Uma motocicleta gastou 25,8 li- 
tros de gasolina em uma viagem. 
No começo da viagem o mostrador 
de quilometragem indicava 12346 
e, ao final da viagem, indicava 
13193. De quantos quilômetros por 
litro foi o consumo? 

Resposta: 


f. À circunferência de um círculo é 
dada pela fórmula 2 x m x R. (R é 
o raio.) Uma bicicleta tem a roda 
com o raio de 35,234 cm. Qual é a 
circunferência da roda? (Dica: a 
constante r vale 3, 14159. ) 


Escreva aqui embaixo o resultado: 


Resposta: 

À exponenciação (um número ele- 
vado a outro) é uma operação com 
ordem de precedência mais alta do 
que a divisão. Ou seja: 


SE HOUVER UMA EXPONENCIA- 
ÇÃO, ELA SERÁ CALCULADA EM 
PRIMEIRO LUGAR 

Por exemplo: 

PRINT 2 + 3:+2/3 
Dará o resultado 5, porque o compu- 
tador primeiro calculará 3:*2 (que é 
9), depois dividirá o 9 por 3 (pois a 
divisão é a que vem depois). Aí ele 
fará a soma. 

Existem muitas outras funções no 
BASIC, além da raiz quadrada. De- 


pois aprenderemos outras. 


Resposta: 


g. Quantas voltas por quilômetro 
dará uma roda de automóvel com 
um diâmetro de 45 cm? 

Resposta: 


h. Em um triângulo retângulo, o 
quadrado da hipotenusa é igual à 
soma dos quadrados dos catetos. 
Supondo que a hipotenusa mede 
29,238 e um dos catetos mede 12,34, 
qual é o valor do outro cateto? 
Resposta: 


4.6. Verifique se os comandos abai- 
xo estão corretos. Se não estiverem, 
coloque ao lado a forma correta. De- 
pois, digite no computador e escre- 
va o resultado ao lado. 


a. PRINT (2 * (3 + 4) — 2 

b. PRINT PRINT 

c. PRINT 84 + 1135-20+4767 
d. PRINT -3+-4 


4.7. Para que servem os parênteses 
em uma pena matemática em 
BASIC? 

Resposta: 


“ 
4.8. O que substitui as'chaves e col- 
chetes de uma expressão matemáti- 
ca em BASIC? 
Resposta: 





C A P 1 







Os 
PROGRAMAR O 
COMPUTADOR? 


Pe 


Quando quisermos que o computa- 
dor faça algum cálculo e mostre o rTe- 
sultado na tela, usamos o comando 
PRINT. Este comando, junto com à ex- 
pressão matemática, funciona como 
uma ordem para o computador. 

Assim, se você escrever no teclado 
esta instrução: 

PRINT 34534 + 12111 
e pressionar a tecla NEW LINE, o 
computador fará a conta e mostrará 
o resultado na tela: 





E SE VOCÊ QUISER FAZER DE NO- 
vO A MESMA CONTA NO COMPU- 
TADOR? 

Você já sabe a resposta: 

À instrução precisa ser introduzida 
de novo no computador. 

Se você tiver que fazer uma série de 
contas repetidas, isso vai dar muito trar- 
balho, porque cada vez você vai ter 
que digitar de novo as instruções. 

Felizmente o computador tem ME- 
MÓRIA. 

E existe um macete para colocar 
na memória dele as instruções que 
quisermos. Depois de termos feito is- 
so, ele vai se lembrar das instruções, 
e não vai ser preciso digitá-las de no- 
vo toda vez que quisermos repetir os 
cálculos. 

Preste bem atenção: 

PROGRAMAR O COMPUTADOR É 
COLOCAR INSTRUÇÕES EM SUA 
MEMÓRIA. 

Você vai aprender a fazer um PRO- 


GRAMA. 


m Programa 
em BASIC 
d 


DEE 





No capítulo 3, vimos que o computa- 
dor pode ser usado como uma calcula- 
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T UU LO 


dora, através do MODO DIRETO. 

O computador obedece a instrução 
PRINT que damos a ele, e em segui- 
da “esquece” a instrução. 

Fazer com que o computador gra- 
ve a instrução em sua memória é a 
coisa mais simples do mundo: , 
BASTA COLOCAR UM NUMERO 
QUALQUER NO COMEÇO DA INS- 
TRUÇÃO. 

Siga o exemplo: 

Se quisermos colocar na memória 
a seguinte instrução: 

PRINT 34534 + 12111 
basta digitar (escrever no teclado) da 
seguinte forma: 

| PRINT 34534 + 12111 

Vamos entender juntos tudo o que 
está contido nessa linha. 


| — é o número da linha. Pode ser qual- 
quer número; 

PRINT — é a instrução, ou comando que 
damos ao computador; 

34534 — é um dos dados que fazem par- 
te da expressão matemática de cálculo; 

+ — é a operação que queremos fazer 
(que, no exemplo, é a de somar); 

12111 — é o outro dado da expressão de 
cálculo. 


Experimente digitar essa linha no 
computador, e apertar a tecla NEW 
LINE: 


Veja o que aconteceu: 





O COMPUTADOR NÃO FEZ A 
CONTA! 

Ao invés disso, ele colocou a linha 
que você introduziu lá no topo da tela, 

ISSO QUER DIZER QUE ELE GUAR- 
DOU A INSTRUÇÃO NA MEMÓRIA! 

O número 1 significa que essa é a 
primeira instrução que queremos 
que ele obedeça. Depois você vai ver 
que podemos colocar mais instruções 
EM UM MESMO PROGRAMA. 

Note também que a instrução que 
estava digitada na linha de baixo da 
tela desapareceu, como se fosse car- 
regada para a parte de cima. 

E apareceu de novo o cursor K. Isso 
quer dizer que o computador está 
pronto para aceitar mais uma ordem. 

E agora? 

Como vamos fazer para obrigar o 
computador a obedecer a instrução 
PRINT? 


Ele guardou na memória, tudo 


q 


bem. Mas, para obrigá-lo a EXECU- 
TAR O PROGRAMA (ou seja, obede- 
cer as instruções), eu devo usar um 
novo comando: 

RUN 
e pressionar a tecla NEW LINE. 

RUN, em inglês, quer dizer CORRA! 
Que significa também: RODE O PRÔ- 
GRAMA. Rodar, na gíria das pessoas 
que lidam com computador, quer di- 
zer: executar um programa que estiver 
na memória do computador. 

Para introduzir o comando RUN, 
aperta-se a tecla R, quando o cursor 
na tela for K. Note que acima da te- 
cla R está escrito RUN. 

Pressione RUN e veja o que acon- 
tece: 





E agora aperte a tecla NEW LINE: 





o resultado no cálculo apareceu na 
tela, em cima. 

Na linha de baixo, a mensagem 
0/1 significa: 


0 — não houve nenhum erro no pro 
grama 

| — o programa parou na linha núme- 
ro | 


Agora que a instrução está na me- 
mória do computador (no progra- 
ma), podemos pedir para o computa- 
dor executá-la novamente quantas 
vezes quisermos. Basta digitar RUN 
novamente. Experimente! 

Qual é o resultado? 

Pressione agora a tecla NEW LINE 
de novo. Veja o que acontece: 

O programa apareceu de novo no 
topo da tela. 

Isto quer dizer que ele ainda está 
na memória. Se ele está lá ainda, 
quer dizer que eu posso executá-lo 
novamente com outro comando 
RUN. 

O cursor K também voltou a apare 
cer na parte de baixo da tela. 


azendo 
Programas 








Outra vantagem de colocar as ins- 
truções em um programa é poder 
obrigar o computador a memorizar 
mais de uma instrução. 

Da última vez que você mexeu no 
computador, a tela estava assim: 





Ágora vamos colocar uma outra 
instrução no programa. Para isso bas- 
tará colocar outro número no começo 
do novo programa. Esse número de- 
verá estar em ordem crescente, com- 
parado com o número do programa 
anteriormente digitado. Como a ins- 
trução anterior usou o número 1, va- 
mos usar nesta o número 2: 


2 PRINT 897 — 345 


Digite essa nova instrução e pres- 
sione a tecla NEW LINE: 





Note que agora o nosso programa 
tem duas instruções, uma debaixo da 
outra. Por isso demos o número 2 (or- 
dem crescente) à segunda linha. E 
para que o computador saiba que es- 
sa linha deve vir depois da outra: as- 
sim ele vai saber a ordem das linhas. 

Pressione RUN e NEW LINE e veja 
o resultado: 


o computador calculou e mostrou 
primeiro o resultado da linha 1 
é depois o resultado da linha 2. 


Ele sempre obedece assim aos pro- 
gramas: primeiro ele obedece a um 
comando e só depois vai obedecer 
ao outro. 

Se você pressionar NEW LINE nova- 
mente, veja o que acontecerá: 





Aí está o programa novamente. 

Outra coisa interessante de um pro- 
grama BASIC é que eu posso man- 
dar o computador rodá-lo (executá- 
lo) a partir da linha que eu quiser. 
Experimente digitar RUN 2: 





O computador fez apenas a segun- 
da conta, ou seja, ele executou o pro- 
grama a partir da linha número 2. . 
SE EU NÃO COLOCAR NENHUM NU- 
MERO APOS O COMANDO RUN, ele 
começa a executar um programa a 
partir da instrução que estiver em pri- 
meiro lugar. 


omo Apagar 
um Programa 





de eu quiser tirar este programa 
da memória do computador, para co- 
locar outro, existe o comando: 


NEW 


NEW quer dizer NOVO, em inglês. 
Ou seja, eu quero colocar um progra- 
ma novo, por isso apago da memória 
o programa velho. 


Para introduzir o comando NEW, 
deve-se apertar a tecla À, quando 
na tela estiver o cursor K. 

Experimente: 





E agora aperte a tecla NEW LINE. 
Note que o programa desapareceu 
da memória. 


ER ERRA) 


Vamos fazer um programa para 
entender melhor o que foi explica- 
do. O problema vai ser o seguinte: 

Vamos fazer um programa para 
mostrar na tela a tabuada de multi- 
plicar pelo número 7. 

O programa para fazer isso deve 
ser assim: 

JO PRINT7+1 
20 PRINT 7 + 2 
30 PRINT 7 +3 
40 PRINT 7 + 4 


Coloque esse programa na memó- 
ria do computador. 

Você deve estar achando estranho 
que os números das linhas neste pro- 
grama vão de 10 em 10. 

Isso não é problema. Como já foi 
dito, a gente pode colocar o número 
de linhas que quiser, desde que este- 
ja em ordem crescente (ou seja, os 
números das linhas que vêm depois 
têm que ser cada vez maiores). Exis- 
te uma vantagem em colocar os nú- 
meros de linha de 10 em 10 ou de 20 
em 20, em vez de 1 em 1, como no 
primeiro programa. Depois você vai 
entender por quê. 

Por enquanto, introduza o progra- 
ma como está aqui. 





E pressione a tecla RUN. O resulta- 
do mostrado na tela será: 





mm 


Apareceu tudo de uma vez, uma 
multiplicação em cada linha. 


orrigindo 
o Programa 


AS E PT 


O programa que está colocado na 
memória pode ser modificado quan- 
tas vezes eu quiser. 

Existem maneiras de colocar mais 
linhas, digitar de novo uma linha (se 
eu errei ou quero mudá-la), e até 
apagar uma linha. 

Essas são chamadas funções de 
edição do BASIC. 

Observe que eu posso colocar 
mais linhas NO FINAL do programa, 
se eu quiser: 


50 PRINT 7 +56 
Pressione RUN. 
O que aconteceu? 





Se uma linha do programa na me- 
mória estiver errada, ouse eu quiser 
mudá-la, basta escrevê-la de novo, 
começando com o mesmo número 
da linha: 


5.1. O que se deve fazer para colocar uma ins- 
trução na memória do computador? 


5.2. O que acontece quando nós digitamos 
uma linha de instrução que começa com um 
número? 


5.3. O que acontece quando nós digitamos no 
computador uma linha de instrução que não 
começa com um número? 


5.4. Defina com suas próprias palavras o que 
é um PROGRAMA: 


5.5. Cite duas vantagens de poder colocar um 
programa na memória do computador: 


5.6. Para que servem os comandos: 
RUN 


NEW 
PRINT 


5.7. Por que devemos numerar em ordem cres- 
cente as linhas de um programa? 


5.8. Faça de conta que você é o computador, 
e alguém colocou na sua memória o progra- 
ma abaixo: 


10 PRINT 2 * 3/2 


20 PRINT (233 — 33/10 
30 PRINT SQR 16 


Vamos supor que eu quero a linha 
50 mudada para: 
50 PRINT7+6 
Experimente digitá-la assim, e 
pressione NEW LINE. Veja o que 
acontece: 





A linha 50 foi SUBSTITUIDA por 
uma nova. À linha 50 antiga sumiu. 

Posso também colocar novas instru- 
ções NO MEIO do programa que está 
na memória. 

Suponhamos que eu quero ver tam- 
bém o resultado de 7 vezes 2,9 (apa- 
recendo na tela entre 7x 2e 7 x 3). Ex- 
perimente digitar a linha. 


25 PRINT 7 + 2.0 


E pressione a tecla NEW LINE: 
| ps 





Agora pressione a tecla RUN: 


TES 





este programa. 


Mas lembre-se: não vale testar no computa- 
dor. Faça de conta que você é o computador! 
Como apareceria o resultado na tela, se o 


computador receber o comando RUN? 


EE 


Como apareceria o resultado na tela, se o 


computador receber o comando RUN 20? 


Como ficaria o programa na memória, se 


for introduzida a linha: 


15 PRINT 99 


E 


Agora responda às perguntas abaixo, sobre 





Crie MANN RS aa DSR 
O COMPUTADOR COLOCA A LI- 
NHA DE INSTRUÇÃO NA ORDEM 
CERTA 

Agora você entendeu qual é a van- 
tagem de numerar as linhas de 10 
em 10. Deixando um “espaço entre 
elas, eu posso mais tarde colocar 
uma ou mais linhas de instrução en- 
tre elas. 

Isso se chama INSERIR LINHAS. 

Outra coisa interessante que posso 
fazer é apagar uma linha sem preci- 
sar apagar todo o programa. 

Com o programa da tabuada na 
memória, experimente digitar ape- 
nas o número de linha 25 e pressione 
NEW LINE: 

Pressionando de novo NEW LINE, 
você vê que a linha 25 desaparece. 

Pressione RUN e me diga qual foi o 
resultado: 

Resposta: 


no 


E como ficaria o programa, se agora fo 


digitado apenas o número: ] 
30 (NEW LINE) 


4 
. 


! 


E 
Qual será o novo resultado, se o compl 
dor receber o comando RUN novamente? 


1) 


AGORA COLOQUE ESSES EXERCÍCIOS: 
COMPUTADOR E VEJA SE CONFERE. | 





É 


5.9. Faça um programa para calcular e 
trar na tela a tabuada de multiplicar d 
mero 9: 








5.10. Faça um programa para calcular qu 
tos segundos tem um ano, e quantos dias 
um período de 14 anos. 





rogramas 
Que Fazem 
Contas 








Vamos fazer agora alguns exercí- 
cios utilizando o comando PRINT den- 
tro de programas. 

Para isso, vamos programar alguns 
exemplos do TESTE do capítulo 3: 


|. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 36 
polegadas. Qual é o comprimento do 
campo em centímetros e em metros 
(dica: uma polegada vale 2,54 cm) 


SOLUÇÃO: 

10 PRINT 100 + 36 + 2.94 

20 PRINT (100 + 36 * 2.54)/100 

RUN 

A linha 10 vai dar a solução em 
centímetros, e a linha 20 em metros 
(100 jardas vezes 36 polegadas vezes 


2,54 cm dividido por 100, para dar a 
solução em metros). 


2. Uma motocicleta gastou 25.8 litros 
de gasolina em uma viagem. No co- 
meço da viagem o contador de quilo- 
metragem indicava 12346 e, ao final 
da viagem, indicava 13193. De quan- 
tos quilômetros/litro foi o consumo? 


SOLUÇÃO 
10 PRINT (13193 - 12346)/25.8 
RUN 


Resposta: 


OCS O SD CAES Dr qd ER diJuyara 


3. A circunferência de um círculo é 
dada pela fórmula 2 x m X R. O sím- 
bolo m vale 3.14159; e o R é o raio da 
circunferência. Uma roda de bicicle- 
ta tem o raio de 35,234 cm. Qual é a 
circunferência da roda? 


SOLUÇÃO: 
10 PRINT 2 » 3.14159 * 35.234 
RUN 


Ra vis da dada E WNOLO DU o GS MSUR 


4. Quantas voltas por quilômetro da- 
rá uma roda de automóvel com diá- 
metro de 45 cm? 


SOLUÇÃO 
10 PRINT 100 + 1000/(3.14159 + 45) 
RUN 


Resposta: 


BZ is FUPOV Tod UA Elaracs mimos pousa é 


O número de centímetros contidos 
em um quilômetro é 100 x 1000. 

A circunferência de um círculo é 
igual a m X diâmetro. 

Dividindo o número de centímetros 
em um quilômetro pela circunferên- 
cia, teremos o número de voltas da- 
das em um quilômetro. 


5. Em um triângulo retângulo, o qua- 
drado da hipotenusa é igual à soma 
dos quadrados dos catetos. Supondo 
que a hipotenusa mede 29,238 e um 
dos catetos mede 12,34, qual é o va- 
lor do outro cateto? 


SOLUÇÃO: 


10 PRINT SQR (29.238 2-12.34 
at 2) 


RUN 


Gus nodos erre rir SA sa 





C A P 1 


T UU LO 


o 











TAMBÉM 
ESCREVE 


DO 





Até agora, você viu que podemos 
usar a instrução PRINT para mostrar nú- 
meros na tela do computador, de modo 
direto ou em um programa. O coman- 
do PRINT também serve para calcular 
expressões matemáticas e mostrar, ao 
mesmo tempo, o resultado. 

Agora vamos aprender como pro- 
gramar o computador para que ele 
escreva letras na tela. 

Se conseguirmos fazer com que O 
computador escreva letras, também 
poderemos conseguir que escreva no- 
mes, títulos e mensagens, certo? 

Uma instrução PRINT também po- 
de ser usada para escrever letras (A, 
B C, D... etc.), e outros sinais espe- 
ciais (& % $ N e outros). Às letras, nú- 
meros e sinais especiais são chama- 


dos de CARACTERES. 


A letra À é um caractere. 
O cifrão ($) também é um caractere. 


E o espaço em branco também é 
um caractere (tecla SPC, que quer di- 
zer ESPAÇO, e tem o mesmo efeito 
que aquela barra da parte de baixo 
do teclado da máquina de escrever). 

muito simples fazer o computa- 
dor escrever alguma coisa. 

Basta colocar entre aspas a MEN- 
SAGEM que nós queremos que ele 
escreva. 

Assim: 


PRINT“ALÓ, EUSOU O 
COMPUTADORR"” 


Experimente digitar esta linha no 
computador: 





E aperte NEW LINE: 

Viu? 

O computador escreve na tela exar- 
tamente o que você escreveu entre 
aspas. 
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Mesmo se você tivesse colocado atl- 
go errado (ou um palavrão!): 


PRINT “ALÓ, EUSOU O 
COMPUTADOR" 


Ao computador não interessa o 
que você põe entre aspas. 

Pode ser até em turco ou em italia- 
no. Ele reproduz como está. 


PRINT “HELLO, HOW ARE YOU? 


Podemos colocar mensagens em 
uma instrução PRINT, tanto de modo 
direto (linha sem número no come- 
ço), quanto em um programa (linha 
com um número no começo). 

Vamos fazer um programinha. 

Primeiro pressione a tecla NEW pa- 
ra “limpar” a memória. 

Introduza agora o 
programa: 


seguinte 


10 PRINT “ALÔ, COMO VAI VOCÊ?” 

20 PRINT 

30 PRINT “EU SOU O 
COMPUTADOR TK 85" 

40 PRINT “E EU TAMBÉM SEI 
ESCREVER” 


Você já aprendeu que o computa- 
dor é meio “burro. 

Ele só faz uma coisa de cada vez. 

Primeiro, ele obedece o comando 
número 10, depois o 20, depois o 30. 

Veja agora o que acontece, se Vo- 
cê pressionar a tecla RUN: 





Usando espaços (como o da linha 
20, que fica “em branco e como os 
da tecla SPC, que separa as pala- 
vras entre si), eu posso colocar onde 
quiser, na tela, alguma mensagem 
ou título: 


10 PRINT “COMPUTADOR TK 85º 


Todos os espaços colocados na 
mensagem entre aspas são mostra- 
dos na tela do computador. 


isturando 
Nomes e 
Números 





TO 


Usar palavras entre aspas dentro 
de uma instrução PRINT é muito útil 
para dar um título às respostas dos 
cálculos feitos pelo computador. 

A instrução PRINT permite a você 
misturar mensagens com expressões, 
na ordem que quiser. 

Vamos dar um exemplo: 

Quantos segundos existem em um 
ano? 

Esse programa você já fez: 

10 PRINT 60 + 60 + 24 + 265 

O computador vai mostrar este Te- 
sultado, quando você pressionar a te- 
cla RUN: 





Você sabe o que significa esse nú- 
mero sozinho lá na tela, certo? Afinal, 
foi você quem resolveu o problema. 





1. Faça um programa para escrever na tela o seu nome e o de sua escola. 


a: 


2. Faça um programa para colocar seu nome bem no meio da tela, na linha de cima. 





Mas os programas de computador 
são feitos também para uso de outras 
pessoas. Por isso é bom colocar títulos 
para explicar os resultados na tela. 

Veja como fica bem melhor assim 
o programa: 

10 PRINT "UM ANO TEM; 60 » 60 » 

24 * 365; SEGUNDOS.” 

Vamos analisar as partes desta 
instrução: 


10 5 é o número da linha 

PRINT 5 a instrução para mostrar o 
que vem depois 

“UM ANO TEM' 5 deve aparecer 
primeiro esta mensagem 

: > serve para separar a mensa- 
gem do que vem depois 

60 + 60 + 24 + 365 5 cálculo do núme- 
ro de segundos em um ano 

: > serve para separar o número Te- 
sultante da palavra 

“SEGUNDOS.” > outra mensagem 


Experimente digitar o programa no 
computador. Pressione a tecla RUN e 
veja o que acontece: 





Viu como funciona direitinho? 

EM UMA INSTRUÇÃO PRINT NÓS 
PODEMOS COLOCAR QUANTOS TÍ- 
TULOS, EXPRESSOES E NUMEROS 
QUISERMOS. 

À única condição é que eles este- 
jam separados uns dos outros por 
meio de espaços. 

Você aprendeu que o ponto e vírgu- 
la (:) é usado para separar os elemen- 
tos (partes) de uma linha de impres- 
são PRINT. 

USANDO O ; NO LUGAR DE SPC, 
AS PARTES DA LINHA DE IMPRES- 
SÃO VAO ESTAR UNIDAS UMAS 
NAS OUTRAS. | 

Ou seja, elas serão mostradas na 
tela sem ter entre si um espaço em 
branco. 

Experimente que diferença faz es- 
tes três comandos PRINT: 


10 PRINT "3 VEZES 2 IGUAL A ;6 
20 PRINT "3 VEZES 2 IGUAL À ";6 
30 PRINT "3 VEZES 2IGUAL A ";6 


Digite este programa no computa- 
dor e veja o resultado quando pres- 
sionar a tecla RUN: 





Quando pomos várias mensagens 
em seguida na mesma instrução 
PRINT, podemos fazer com que elas 
apareçam grudadas umas nas ou- 
tras ou não. Tente digitar as seguin- 
tes linhas-de modo direto: 


PRINT RENATO”; REJANE” 
PRINT RENATO ”; “REJANE” 
PRINT RENATO”; ” REJANE' 
PRINT “RENATO” REJANE 


Responda: qual a diferença entre 
os resultados impressos destas li- 
nhas? 


CONCRETO IOY ECCEO SDS GDE, 


CA DD GD PSPorsdDD A DAS md Se sdsdzdnes xd dd DO Reta 


OS ESPAÇOS EM BRANCO DEN- 
TRO DAS DUAS ASPAS TAMBÉM 
SÃO IMPRESSOS. 


mprimindo 
Onde Eu 
Quero 





Depois de saber para que serve o 
ponto e vírgula no comando PRINT, é 
fácil entender como podemos impri- 
mir qualquer mensagem ou resulta- 
do em um ponto qualquer da tela. 

Vamos mostrar um exemplo: 

Eu quero imprimir na tela uma li- 
nha contendo o nome de um time de 
futebol (no começo da linha), depois 
a cidade de onde ele é (começando 
na posição número 15 da linha), e 
quantos pontos ele tem (começando 
na posição número 25 da linha). 

Pondo vários times assim, vai se 
formar uma tabela bonitinha, com to- 
das as colunas alinhadas, certo? 


PALMEIRAS SÃO PAULO 12 
GUARANI CAMPINAS 9 
PONTE PRETA CAMPINAS 7 


É claro que nós podemos fazer li- 
nhas PRINT assim: 


10 PRINT “PALMEIRAS SÃO PAULO 
12" 

20 PRINT “GUARANI CAMPINAS 9" 

30 PRINT "PONTE PRETA CAMPINAS 
7” 


Mas é claro que assim há muito 
desperdício de espaços'em branco. 

Cada letra, número ou espaço que 
colocamos dentro de uma mensagem 
PRINT ocupa uma unidade a mais de 
memória no computador. 

Como o computador não tem mui- 
ta memória, às vezes é importante 
economizá-la. 

Outra coisa aborrecida neste méto- 
do é que temos que digitar um monte 
de brancos repetidos. Isso demora e 
sempre apresenta erros (contamos o 
número errado de brancos). 


PARA CONTAR ESPAÇOS EM 
BRANCO ENTRE DUAS MENSA- 
GENS OU NUMEROS, EXISTE UMA 
FUNÇÃO ESPECIAL EM BASIC 


Lembra-se das funções? 

O exemplo que nós demos foi da 
raiz quadrada (SQR): você fornece 
um número (o argumento), e a fun- 
ção calcula outro (a raiz quadrada). 

Ágora vamos estudar a função 
TAB. 

(Procure onde ela fica no teclado. 
Lembre-se de que é preciso transfor- 
mar antes o cursor em F, pressionan- 
do SHIFT E NEW LINE). 

Ela não calcula nada: apenas colo- 
ca onde quisermos os elementos de 
uma instrução PRINT. 


Por exemplo: 
PRINT TAB 10;"VIDEO GAME” 


Vai escrever a mensagem: 





começando na posição 10 da linha, 
quando o comando PRINT for obede- 
cido. 
Dizemos que houve uma TABULA- 
ÇÃO até a coluna (ou posição) 10. 
Veja como ficaria melhor o nosso 
programa de exemplo: 


10 PRINT “PALMEIRAS; 
"SÃO.PAULO"; TAB 25;12 
“20 PRINT “GUARANI; TAB 15; 
"CAMPINAS"; TAB 25;7 

30 PRINT'PONTE PRETA"; TAB 15; 
"CAMPINAS"; TAB 25;5 


TAB 15: 


Digite o programa no computador 
(nunca se esqueça de pressionar a te- 
cla NEW LINE se antes já tiver algum 
programa na memória, que possa 
apagá-lo). 

Veja como o resultado é idêntico 
ao programa anterior. | 
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E você aprendeu algumas coisi- 
nhas agora: 


1. A FUNÇÃO TAB NÃO CALCULA 
NADA (NÃO É MATEMÁTICA) 


2. O ARGUMENTO DE TAB INDICA 
EM QUE COLUNA VAI COMEÇAR A 
MENSAGEM 


3. POSSO COLOCAR VÁRIOS TAB 
NUMA MESMA LINHA 


4. A FUNÇÃO TAB FUNCIONA SO- 
MENTE PARA UMA LINHA NA TELA 


Uma outra coisinha: o argumento 
da função TAB também pode ser 
uma expressão matemática. Por 
exemplo: 


PRINT TAB (45 - 3+2);/MEU NOME” 


que é calculado pelo computador 
e vale a mesma coisa que: 


PRINT TAB 39;"MEU NOME * 


Note que temos que usar parênte- 
ses quando a expressão é constituída 
por letras. 

Agora, para não usar de modo er- 
rado o comando TAB, é importante 
saber o seguinte: 


UMA LINHA NA TELA DO TK 85 TEM 
ATÉ 32 COLUNAS 


Por isso, não é bom colocar um nú- 


Vamos fazer agora alguns exercí- 
cios simples. 

Vamos pegar alguns exemplos de 
EXERCÍCIOS anteriores de cálculo, 
usando o PRINT, e vamos colocar al- 
guns títulos para melhorar a manei- 
ra como o computador mostra os re- 
sultados na tela. 

Para cada programa seguinte, pro- 
cure fazer várias linhas: umas con- 
tendo os dados do problema, e ou- 
tras os resultados. 


1. Um carro tinha 45.5 litros de com- 


bustível no tanque. Depois de uma 
viagem ficou apenas com 10.0. Eu ti- 
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mero maior que 32 como argumento 
de TAB: 

Não funciona colocar vários TAB 
numa mesma linha, mas com argu- 
mentos que sejam menores do que 
os que vinham antes. 

Por exemplo: . 

PRINT TAB 12; JOÃO E”; TAB 5; MA- 
RIA ' 

Experimente no computador para 
ver o que acontece. 

Resposta: 


Existe também uma outra maneira 
mais simples de separar as partes 
misturadas de um comando PRINT, 
por meio de tabulações: é usando a 
vírgula. 

A diferença entre o ponto e vírgula 
e a vírgula é que esta tabula, na ho- 
ra da impressão, a mensagem ou re- 
sultado, começando na coluna 16 na 
tela. 

Vamos seguir estes exemplos: 


PRINT “RENATO”, REJANE 


Vai aparecer assim na tela: 








“ACCIO nJ Q 
Granito) 
nha gasto Cr$ 12 400,00 para encher 
o tanque de 50 litros. Quanto custou 
o litro de gasolina e quanto custou a 
gasolina gasta na viagem? 

Resposta: 


Resultado: 


2. Qual é a média das notas 4.5, 8.6, 
3.2e 7.0? 
Resposta: 


Note que RENATO está começando 
na coluna 1 da primeira linha, e RE- 
JANE na coluna 16 da mesma linha. 


A vírgula funciona como TAB 16. 
Agora outro exemplo: 


PRINT “COMPUTADOR”, TK 85”, 
“FUNCIONA 


Vai aparecer assim na tela: 





O que aconteceu? 

A primeira vírgula colocou TK 85 
na coluna 16 da primeira linha. 

A segunda vírgula iria colocar 
mais 16 espaços de tabulação (o que 
daria 32). 

Mas como a linha só tem 32 colu- 
nas, a palavra FUNCIONA foi para a 
primeira posição da linha seguinte! 

Podemos usar a vírgula para brin- 
car um pouco: 


PRINT'FLIPERAMA”, LEGAL”, TK 
8 


Veja que duas vírgulas sem nada 
entre si, valem dois TAB 16. 


Resultado: 


3. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 
36 polegadas. Qual é o comprimento 
do campo em centímetros e em me- 
pç (dica: uma polegada vale 2,54 
cm 


Resposta: 


Resultado: 


6.1. Digite no computador: 


c. PRINT'8 + 6 =";8+6 
Qual foi o resultado em cada caso? 
Explique a diferença: 


6.2. Para que servem a vírgula e o 
ponto e vírgula dentro de uma de- 
claração PRINT? 


6.3. Qual é a utilidade de se mistu- 
rar mensagens entre aspas e resul- 
tados numéricos ou expressões ma- 
temáticas em um comando PRINT? 


6.4. Quais são as dimensões da tela 
do TK 85: 

número de linhas: 

número de colunas: 
Para que serve a última linha de 
baixo na tela? 


6.5. Verifique se os comandos abai- 
xo estão corretos. Se não estiverem, 
coloque ao lado a forma correta. De- 
pois, digite no computador e escre- 
va o resultado ao lado. 


a. PRINT (2 + (3+4)—2 

b. PRINT PRINT 

c. PRINT 84 + 113520 + 4767 
d. PRINT “TK";85;"C” 


e. PRINT “CURSO DE COMPUTA- 
DORES” 





TESTE 


t. PRINT —3 + —4 
g. PRINT"CONTAS DE SOMAR 


h. PRINT"COMPITADOR 


6.6. Usando a função TAB, escreva 
uma instrução PRINT para colocar a 
palavra COMPUTADOR exatamen- 
te no centro da linha da tela. 


6.7. Escreva uma instrução PRINT 
para colocar na tela os números de 


l a 8, distribuídos em duas colunas, 


assim: 

1 2 
3 4 
N) 6 
7 8 
Resposta: 


6.8. Responda: TAB é: 


a. comando 

b. função 

c. programa 

d. não existe em BASIC 


6.9. Para que serve a função TAB? 


6.10. Faça de conta que você é o 
computador. Como ficará a tela do 
computador, depois de obedecer ele 
as instruções seguintes? 


a. PRINT"MEU NOME É","DANIEL" 


b. PRINT TAB 25; TESTE”,,, "ESPA- 
CIAL” 


c. PRINT TAB 12;12;TAB 28;28 


6.11. Responda se é verdadeiro (V) 
ou falso (F): 
() À função TAB não calcula ne- 
nhuma função matemática. 
( ) Só se pode colocar um TAB em 
cada instrução PRINT. 
() À vírgula usada para separação 
em PRINT funciona como TAB. 
( ) TAB quer dizer tabulação. 
( ) Posso usar a função TAB com 
um número maior do que 32. 


6.12. Faça um programa para colo- 
car na tela uma lista de 3 times de 
futebol, numerada. Por exemplo: 

1 P 

2 BOTAFOGO 

3 FLAMENGO 
Resposta: 


6.13. Faça um programa para colo- 
car um sinal + em cada canto da te- 
la (dica: use o comando PRINT AT). 


epetindo 
Coisas 





IT Dr a a a 


Outro dia eu me convenci de que 
devia escrever quatro vezes meu no- 
me na tela do computador. 

O programa para fazer isso é fácil, 
não acha? 


10 PRINT “RENATO” 
20 PRINT “RENATO” 
30 PRINT “RENATO” 
40 PRINT "RENATO" 


O computador vai obedecer assim: 





Faça a mesma coisa com o seu no- 
me e veja o resultado! 

Eu também poderia ter escrito as- 
sim: 

10 PRINT “RENATO RENATO RENA- 
TO RENATO” 

Em vez de aparecer tudo na verti- 
cal (um nome em cada linha), ia apa- 
recer tudo na horizontal, certo? 

Pois bem. E se eu quiser encher a 
tela inteira com o meu nome? 

Não responda já: preste bem aten- 
ção. 

A tela tem 21 linhas. Eu teria que 
colocar no programa 21 instruções 
PRINT, todas iguais. 

Daria muito trabalho, não é? 


EU POSSO ORDENAR AO COMPU- 
TADOR QUE REPITA UMA LINHA DE 
PROGRAMA QUANTAS VEZES EU 
QUISER. 


Basta mandar que ele “volte” até a 
linha PRINT. 
Assim: 


10 PRINT "RENATO" 
20 GOTO 10 


A instrução GOTO, em 
quer dizer: VA PARA 

Portanto, GOTO 10 quer dizer: VÁ 
PARA A LINHA NUMERO 10! 

Como é que isto faz o computador 
repetir a linha 10? 

Lembra-se de que eu disse que o 
computador obedece (executa) uma 
linha de cada vez? E que ele só exe- 
cuta a linha seguinte depois de fazer 
o que a linha anterior diz? 


inglês, 
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Pois bem. Siga as flechinhas abai- 
xo. Você é o computador. 


10 PRINT “RENATO: 


Y 


20 GOTO 10 


A primeira vez que eu pressionar a 
tecla RUN, o que acontece? 

O computador obedece a instrução 
na linha 10, e escreve na tela: 





Em seguida ele va obedecer a li- 
nha 20, que diz a ele: 
VÁ PARA A LINHA 10 
E ele, bonzinho, volta para lá e exe- 
cuta de novo a linha 10: 
“E de novo: 








Quando ele preenche a tela, apare- 
ce na última linha a mensagem: 


9/10 


Isso quer dizer que o computador 
parou na linha 10, acusando uma 
mensagem número 5. 

A mensagem número 5 significa: 


NÃO HÁ MAIS ESPAÇO NA TELA 


(veja a lista de mensagens de erros 
no fim da obra, onde está explicado o 
que significa cada uma delas). 


Agora o computador vai ficar espe- 
rando que você decida o que fazer: 
a. Se você quiser ficar lendo ou admi- 
rando a tela escrita, ele espera. 


b. Se você quiser que o programa 
continue a ser executado, procure on- 
de fica o comando CONT. Ele signiti- 
ca CONTINUE: você está dizendo a 
ele para continuar. 

O que acontece? 

A tela fica escura, e depois o pro- 
grama continua a repetir a linha 10. 
c. Quando você estiver cansado de 
ver o programa continuar, ao apare- 
cer a mensagem 5/10 pressione a te- 
cla NEW LINE: 





aparece de novo o programa que es- 
tava na memória. 

Uma outra maneira de interromper 
o programa (parar de executar), en- 
quanto ele estiver ainda escrevendo 


as linhas, é pressionar a tecla 
BREAK. 
BREAK em inglês quer dizer QUE- 
BRAR ou INTERROMPER. 

Veja onde fica a palavra, acima 
da tecla NEW LINE. 


Por isso você precisa pressionar ao 
mesmo tempo a tecla SHIFT e a tecla 
NEW LINE. 

Esta tecla BREAK só funciona en- 
quanto o programa ainda não pa- 
rou, ao chegar ao final da tela. 

Faça agora um programa para es- 
crever seu nome em toda a tela (um 
nome em cada linha): 


Como fazer para escrever o nome 
em toda a tela, mas um depois do ou- 
tro (vários em cada linha da tela)? 


Experimente este: 


“JO PRINT "RENATO ; 
20 GOTO 10 


Qual foi o resultado? 


Note que este programa tem duas 
coisas diferentes do outro: 
|. existe um espaço em branco entre o 
fim do nome (letra O) e a última aspa. 

2. existe um ; no final da linha 10. 

Para explicar o que aconteceu é 
fácil: 

colocando um ;: no final da linha 
10, a próxima vez que o computador 
repeti-la, o nome aparecerá unido ao 
anterior. 

Lembra-se de que o ponto e vírgu- 
la serve para separar as partes de 
uma instrução PRINT, que queremos 
que apareçam unidas? 

Aqui também funciona deste jeito. 

Se eu não puser um ; no final da li- 
nha PRINT, a próxima vez que o com- 
putador obedecer outro PRINT, ele 
passará a escrever na linha de bai- 
xo, e assim por diante. 

Coloquei o espaço em branco de- 
pois do nome RENATO para não apa- 
tecer assim na tela: 


RENATORENATORENATORENATO- 
RENATORENATO etc. 


Experimente colocar o seu nome 
ou então com uma frase assim: 


10 PRINT “MARIO E O MAIORAL'; 


ou então: 


10 PRINT “JOÃOZINHO QUER NAMO- 


RAR MARIA ; 


esenhando 
na Tela 








Agora você vai ver que o computa- 
dor TK-85 também pode ser usado pa- 
ra desenhar uma porção de coisas 
na tela, através da programação. 

Essa maneira de desenhar gráfi- 
cos especiais é chamada de MODO 
GRÁFICO 

E ele funciona de uma maneira 
muito simples: é também com a ins- 
trução PRINT. 

Se você olhar bem o teclado, ve- 
rá que na parte de cima de algu- 
mas teclas existem uns desenhos en- 
graçados. 

Eles são chamados de CARACTE- 
RES ou BLOCOS GRÁFICOS. 

Nós temos no teclado os seguintes 
blocos: 





|. Faça um programa para colocar 
na tela as palavras TIC e TAC, uma 
em cada linha, até encher toda a te- 
la, assim: 





Resposta: 


2. Modifique o programa para escre- 
ver toda a tela, mas com as pala- 
vras TIC e TAC unidas. 

Resposta: 


3. O que faz este programa? 
10 PRINT TAB 16; "I” 
125 GOTO 110 


Resposta: 


4. O que há de errado com este pro- 


ama? 
40 PRINT “PROGRAMA BASIC”; 
55 GOTO 45 


Que mensagem de erro vai apare- 
cer, se você colocar esse programa 


no computador e executá-lo? 


5. O que faz este programa? 
100 GOTO 100 


Como devo fazer para interromper 


o programa, neste caso? 


TECLA GRÁFICO 


MES CradaFko UNE nai 


Se você prestar bem atenção, pode- 
rá ver que eles correspondem aos pe- 
dacinhos de um quadrado dividido 
em quatros partes, combinados de di- 
versgs maneiras: 


— HH me a 


Alguns dos blocos gráficos tam- 
bém têm partes cinza (pontinhos bem 
pequenos e próximos). 

Com estes blocos gráficos podemos 
montar uma série de desenhos inte- 


ressantes: 


um avidozinho 








um foguete 


mm 


um dado 


Veja como é fácil! 

Para colocar dentro de uma instru- 
ção PRINT os blocos gráficos, eles de- 
vem estar dentro de aspas. Coloque 
a seguinte linha de programa (pres- 
sione NEW antes): 


tus 


16 PRINT“ [L] 


SEER e pe Ee SE 





Para poder digitar os blocos gráti- 
cos, devemos mudar o cursor L (le- 
tras) para G (gráficos). 

Isto é feito pressionando-se simulta- 
neamente as teclas SHIFT e 9. Veja 
que está escrita a palavra GRA- 
PHICS em cima do rótulo da tecla 9. 
Isso quer dizer GRÁFICOS em portu- 
guês, certo? 

Note que, quando você fizer isso, O 
cursor muda para G: 





Agora tudo o que você digitar pelo 
teclado aparecerá de forma diferente. 
Pressionando AO MESMO TEMPO 


a tecla SHIFT e uma tecla contendo 
um bloco gráfico, ele aparecerá na 
tela. 

Experimente digitar SHIFT e a te- 
cla W: 





Depois SHIFT 6, SHIFT W e SHIFT 6 
de novo: 


19 PRINT“ Emma  [G|] 


RESERVA PE ra a ars o 





Veja que está se formando uma ti- 
gura, porque os blocos gráficos ficam 
grudados (o que não acontece com 
as letras). 

Para colocar as aspas no final, te- 
mos que sair do MODO GRÁFICO. 

Apertamos então as teclas SHIFT e 
9 novamente: 


10 PRINT “ Balls " [L| 


a ore 





Veja que o cursor mudou de novo 
para L. 

Agora sim pressione aspas e de- 
pois NEW LINE. 

Pressione RUN para ver o que 
acontece: 





Colocando várias linhas de progra- 
ma alinhadas, os blocos gráficos das 
linhas de cima se grudam com os de 
baixo: 


“264 SS RR ie E tr D o SURT, TR O ar 


19 PRINT “ Reucdios as 
20 PRINT “ » 





Veja que agora conseguimos fazer 
um avidozinho. 

Tente fazer, como exercício, as ou- 
tras figuras mostradas logo no come- 
ço desta lição! 

O modo gráfico também pode ser 
usado para escrever as letras e ou- 
tros caracteres em cor preta sobre o 
fundo branco, ao invés de como apa- 
recem normalmente na tela. 

Esta maneira de escrever se deno- 
mina MODO INVERSO, ou caracte- 
res em campo invertido. 

Vamos dar um exemplo: 

Suponha que eu quero escrever O 
nome deste computador bem no 
meio do topo da tela, em caracteres 
inversos. Assim: 





Para conseguir isso, você deve 
usar o MODO GRÁFICO para escre- 
ver o nome. Só que não deve pressio- 
nar a tecla SHIFT antes, como no ca- 
so dos blocos gráficos. Pressione as 
teclas das letras que você quiser colo- 
car normalmente: 


Comece digitando: 
10 PRINT TAB 10;' 





Depois pressione SHIFT junto com 
a tecla 9 para mudar o cursor para G 


(GRAPHICS): 





| 1O PRINT TAB 10: |G) 
Eras 2/2 OL ga 


Agora pode digitar as letras TK 85: 





Viu como saiu direitinho? 

Agora pressione SHIFT e 9 juntos 
novamente, para mudar o cursor pa- 
ra L, e digite o sinal de aspas do final 
e pressione NEW LINE: 





Pressione RUN e veja o que acon- 
tece! 


7.1. O que significa para o computa- 
dor quando ele está mostrando na 
tela os seguintes cursores: 


K 


G 


7.2. Defina o que quer dizer: 
MODO GRÁFICO 


MODO INVERSO 


7.3. Que teclas devemos apertar pa- 
ra conseguir digitar os blocos gráfi- 
cos (cursor G)? 


7.4. Faça um programa para dese- 
nhar na tela a figura de uma cabe- 
ça de palhaço dando risada. 





1. Faça de novo o exercício de escre- 
ver TIC e TAC na tela, com um pro- 
grama (lembra-se? TIC em uma li- 
nha e TAC em outra). Só que desta 
vez TIC deve aparecer em caracteres 
normais (letras brancas em fundo 
preto) e TAC em caracteres inversos 
(letras pretas sobre fundo branco). 
Resposta: 


2. Faça um programa para colocar 
no topo da tela uma moldura assim, 
com seu nome no meio dela. Experi- 
mente com diversos caracteres gráfi- 
cos até achar uma moldura bem bo- 
nita: 

Resposta: 


3. Vamos fazer um programa para 


TESTE 


7.5. Modifique o programa anterior 
para colocar a cabeça do palhaço 
no lado direito da tela (dica: use a 
função TAB em todas as linhas 
PRINT). 





7.6. Por que eu devo fazer o cursor 
voltar a ser L antes de digitar as as- 
pas no final de uma instrução 
PRINT com blocos gráficos? 


7.7. Vamos rememorar. Para que 
servem as teclas: 


NEW LINE 
RUBOUT 
RUN 


NEW 


desenhar uma tapeçaria na tela. É 
muito fácil: 

Coloque em primeiro lugar uma ins- 
trução PRINT contendo 7 ou 9 blocos 
gráficos diversos, um grudado no ou- 
tro (entre aspas). Depois coloque 
uma instrução GOTO para repetir 
este PRINT. 

Pressione RUN e aprecie o resul- 
tado! 


Coloque diferentes combinações de 
blocos gráficos para testar qual vai 
ser qa tapeçaria mais bonita. Escreva 
o programa que produziu a mais bo- 
nita aqui: 


€ 

> 

GRAPHICS 

FUNCTION 

SHIFT 

BREAK 

SPACE 

CONT 
E para que servem as instruções e 
funções (dê um exemplo de cada). 
PRINT 


TAB 


SQR 


25 


sando Variáveis 
dentro de um 


Programa 
J 


o 


Agora que você percebeu a utilida- 
de das variáveis para armazenar da- 
dos e resultados intermediários, va- 
mos ver alguns exemplos com progra- 
mas. Digite no computador cada um 
dos programas abaixo, e veja o resul- 
tado. Procure substituir alguns valo- 
res para obter diferentes resultados. 


1. Dados dois números, A e B, faça 
um programa para obter o resultado 
da soma, subtração, multiplicação e 
divisão entre os dois. 


SOLUÇÃO 

Note que das linhas 30 a 60 existe 
uma diferença entre o que está entre 
aspas (é uma mensagem) e o que es- 
tá fora das aspas (é uma expressão). 
O que é mensagem é mostrado na te- 
la exatamente como está. O que é ex- 
pressão é usado para calcular. 


10 LET A=26 

20 LET B=12 

30 PRINT'A + B=";A+B 
40 PRINT'A — B=";A-B 
50 PRINT'A x B =";A*B 


60 PRINT'A / B =";A/B 


Pergunta: Qual é a vantagem de 
se colocar primeiro os dados (no ca- 
so, 25 e 12) dentro de variáveis? 


9. Dados o lado (L) e a altura (A) de 
um retângulo, faça um programa pa- 
ra calcular a área e O comprimento 
da diagonal. 


L 


DEV RI 


SOLUÇÃO 

Temos que usar as fórmulas corres- 
pondentes ao cálculo da área e da 
diagonal de um retângulo (veja a fi- 
gura). 

Em BASIC, a exponenciação é obti- 
da com o operador ** (ele tem uma 
tecla especial: não se pode aperta” a 
tecla * duas vezes, pois haverá erro 
no resultado. A tecla * * fica acima 
da letra H). À raiz quadrada é obtida 
com a função SQR: para digitá-la, 


20 


pressione simultaneamente SHIFT e 
NEW LINE, depois pressione a tecla 
da letra H. 

10 LET L=10 

20 LET A=5 . 

30 PRINT'PROBLEMA DO RETAN- 
GULO" 

40 PRINT'= =========. 
SU PRINT | 
60 PRINTOO COMPRIMENTO DO LA- 


DO =“;L 

70 PRINT'A ALTURA =";Ã 

80 PRINT 

90 LET ÁREA = L*A 

100 LET DIAG = SQR L**2 + Ar*2 

110 PRINT"ÁREA =";ÁREA 

120 PRINT DIAGONAL ="DIAG 

Pergunta: Às linhas 90 e 100 são ne- 

cessárias? Por quê? 


EXE RAN 


1. Refaça os seguintes exercícios do 
capítulo 3, usando variáveis: 

1.1.A altura do King Kong é igual 
a3 péseB polegadas. Quantas po- 
legadas e quantos metros ele tinha 
de altura? 

Resposta: 


1.2. O jogador Zico tinha 300 000 dó- 
lares no banco. Depois recebeu co- 
mo luvas metade de 456 784 dólares, 
menos o imposto de 40 000 dólares. 
Quantos cruzeiros ele terá no total 
(faça a conta como se O dólar vales- 
se 2 800 cruzeiros. Repita O cálculo 
como se o dólar valesse 6 000 cruzei- 
ros). 


Resposta: 


1.3. Um carro tinha 25.6 litros de 
combustível no tanque. Depois de 
uma viagem ficou apenas com 17.3. 
Quantos litros foram gastos? Quan- 
to custou a viagem, se O litro de ga- 
solina custa 1.000 cruzeiros? Quanto 
ele economizaria em litros e cruzei- 
ros se o carro gastasse 20% menos? 
Resposta: 


1.4. A idade de uma pessoa é igual 
a À anos, M meses e D dias. Calcule 
quantos meses, dias e horas esta 
pessoa já viveu, aproximadamente. 
Resposta: 


aixinhas 
para Nomes 





Ds 


Até agora vimos que dq memória 
do computador pode ser usada para 
armazenar números. Esses números 
podem ser O resultado de uma exX- 
pressão matemática: 


LET C = 23 + (25.7-14.2/13 


Neste exemplo, C é o nome da “cai- 
xinha” ou memória que receberá o 
resultado da conta, à direita do sinal 
de igualdade. 

Outra maneira de colocar um va- 
lor numérico em uma variável é por 
meio de uma constante: 


LET PI = 3.141 


Neste exemplo, Pl é o nome da va- 
riável. O número à direita do sinal 
de igualdade não contém nenhuma 
operação matemática ou nome de va- 
riável, por isso é chamado de cons- 
tante. 

Mas não são só números que O 
computador consegue armazenar. 

PODEMOS GUARDAR LETRAS E 
CTERES NA MEMO- 
RIA DO COMPUTADOR 

Para isto, o BASIC do seu computa- 
dor nos permite usar "caixinhas es- 
peciais, que servem para guardar na 
memória conjuntos de letras e de ou- 
tros caracteres. 

UM CONJUNTO DE CARACTERES 
É CHAMADO DE CADEIA | 
Outro nome muito usado para des- 
crever um conjunto de caracteres é 
“string”, uma palavra inglesa que 

significa “cordão”. 

Você já viu antes cadeias de carac- 
teres, lembra-se? 

Por exemplo, no comando: 


PRINT “RENATO” | 


Neste caso, a cadeia é uma pala- 
vra formada de 6 caracteres: 


RENA Teo. 


Mas uma cadeia pode incluir outros 

caracteres. Pode ser uma frase: 
PRINT “O BRASIL TEM 120 MI- 

LHÕES DE HABITANTES 

ou, então, pode ser uma mistura de 

caracteres: 


PRINT “+% te» =8' 
ou caracteres gráficos: 
PRINT “la 


Como podemos dizer ao computa- 
dor que queremos armazenar uma 
cadeia de caracteres em uma variá- 
vel da memória? 

Preste atenção: 

LET N$ = “RENATO” 

Este comando LET está dizendo pa- 
ra o computador: 

GUARDE A CADEIA DE CARACTE- 
RES (ENTRE ASPAS) NA VARIÁVEL 
CHAMADA N$ 

O sinal de cruzeiro ($), também 
chamado de cifrão, serve para indi- 
car ao computador que a variável é 
do tipo alfabético (ou seja, deverá ar- 
mazenar letras e outros caracteres). 
|. Note que, se você esquecer de pôr 
o sinal $ depois do nome da variável, 
o computador vai “estrilar | 

Experimente digitar no compu- 


tador: 
LET N = "RENATO" 


Veja o que aparece na tela: 


Experimente fazer o mesmo, na for- 
ma de um programa, assim: 
10 LET N = “RENATO” 
e depois digite RUN. O que acontece? 


A mensagem de erro está indican- 
do que os tipos não combinam, ou 
seja: 

- a variável à esquerda de = é do ti- 
po numérico 

- a constante à direita de = é do tipo 
alfabético 

O mesmo erro ocorreria se você 
tentasse o contrário: 

10 LET N$ = 123 
O que está errado nesta linha? 


ua omo O 


Computador 
Armazena 
um Nome? 












memória (as caixinhas mostradas 
nos desenhos) para armazenar nú- 
meros. 


Para armazenar nomes, a coisa é 
um pouco mais complicada, mas tam- 
bém é fácil de ser entendida. 

Vejamos: a memória do microcom- 
putador é feita de tal forma que com- 
porta apenas um caractere (uma le- 
tra, por exemplo) em cada caixinha. 
Assim, o nome RENATO seria guar- 
dado em 6 caixinhas agrupadas que 
receberiam a “etiqueta” (nome da va- 
riável) NS. | 

O computador permite que tenha- 
mos até 255 caixinhas agrupadas pa- 
ra guardar uma cadeia de caracte- 
res, todas recebendo um único nome 
de variável. 

Assim, podemos armazenar ca- 
deias de caracteres de qualquer com- 
primento (até um máximo de 255), 
sem nos preocupar com quantas cai- 
xinhas o computador vai usar. Isto 
ele faz automaticamente. 


LET A$ ="NABUCODONOSOR 


(O que diz este último comando?) 


O IMPORTANTE É COLOCARMOS 
OS CARACTERES ENTRE ASPAS 
Para descobrir que a cadeia de ca- 
racteres está armazenada em uma 
variável alfabética, podemos usar o 
comando PRINT. Por exemplo, digite 
o seguinte programa no computador: 
10 LET NOMES =“MICKEY MOUSE” 
20 PRINT NOMESS; "ERA UM RATO!" 

Veja o que vai acontecer, se você 
der o comando RUN: 

Vamos entender juntos este pro- 
grama, linha a linha: 

Linha 10 > armazena a constante 
“MICKEY MOUSE” na variável 
NOMES 

Linha 20 >mostra na tela o conteú- 
do de NOMES, seguido da constante 
alfabética “ERA UM RATO!”, ambos 
na mesma linha. 





1. Escreva abaixo o comando que 
você daria ao computador, para ar- 
mazenar o nome do seu time de fu- 
tebol na variável chamada TIMES. 


2. O que o computador mostrará na 
tela com este programa? 

10 LET FLORS$ ="ROSA” 

20 PRINT"UMA"; FLORS;"É UMA"; 
FLORS$ 


E o que vai acontecer, se eu trocar 


a linha 10 por: 
10 LET FLOR$ ="MARGARIDA” 


No começo deste capítulo, vimos 
que o computador usa unidades de 


3. E este programa, o que vai mos- 
trar na tela? 
10 LET PLANETAS ="MARTE” 
20 LET PLANETAS ='"JUPITER” 
30 PRINT PLANETAS$ 
Explique por quê: 


4. Agora diga o que aparecerá na te-. 
la com este programa: 
10 LET COMIDAS ="ARROZ” 
20 LET ALMOÇOS ="COMIDAS 
30 PRINT"NO ALMOÇO VAI TER”; 
ALMOÇOS 
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ÚMEROS E 
NOMES PELO 
TECLADO 





A 


Até agora, aprendemos a armaze- 
nar números (e nomes), dentro de um 
programa, usando o comando LEI. 

Vamos fazer, por exemplo, um pro- 
grama que armazene a idade e o no- 
me de uma pessoa, em duas variá- 
veis, e depois calcule quantos dias 
ela viveu, aproximadamente. 

Este programa poderia ser assim: 

10 LET ANOS = 14 

20 LET NOMES ="ROBERTO' 
30 PRINT NOMES;"VIVEU MAIS 
DE”; ANOS + 365; DIAS 

Depois de digitar este programa no 
computador: 





Damos o comando RUN, para ver 
o resultado: 





O programa é muito interessante, 
mas há um problema. 

O que devemos fazer se quiser- 
mos colocar a idade e o nome de 
uma outra pessoa para fazer o mes- 
mo cálculo? 

Você já sabe a resposta: 

SEM ALTERAR A LINHA 30, DIGITA- 
MOS DE NOVO AS LINHAS 10 E 20 

Assim, por exemplo: 

10 LET ANOS = 37 
20 LET NOMES 
RENATO” 

O programa agora vai mostrar na 
tela: 


="O PROFESSOR 
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O problema é pequeno, é verda- 
de, mas, se a classe toda e todos os 
amigos do seu irmãozinho quiserem 
fazer a mesma coisa, vai dar muito 
trabalho. Deve haver um jeito mais 
fácil do que ficar sempre mexendo 
ne programa! 

Felizmente, este jeito existe: é o co- 
mando INPUT. 

Este comando substitui o LET, per- 
mitindo que um valor (número ou no- 
me) seja fornecido ao programa pelo 
teclado, sem haver necessidade de 
modificar o programa. 

Preste bem atenção como o progra- 
ma acima seria modificado: 

10 INPUT ANOS 
20 INPUT NOMES 

A linha 30 ficaria igual: 





O comando INPUT na linha 10 sig- 
nifica a seguinte ordem para o com- 
putador: | 

ESPERE ALGUEM ESCREVER UM 
NUMERO NO TECLADO, E GUAR- 
DE-O NA VARIÁVEL ANOS 

O comando INPUT na linha 20 sig- 
nifica: | 

ESPERE ALGUÉM ESCREVER UM 
NOME NO TECLADO, E GUARDE-O 
NA VARIÁVEL NOMES 

Vamos ver agora qual o resultado 
deste programa. Digite RUN: 





O computador parou e mostrou na 
linha de baixo o cursor 

Isto não quer dizer que o programa 
não funcionou (senão apareceria 
uma mensagem de erro, ou o cursor 
K), significa que o computador encon- 
trou a linha 10, e está obedecendo ao 
comando INPUT, ou seja, parou para 
que você digite um número. 

Tudo o que você digitar vai apare- 
cer na linha onde está o cursor 





Depois de ter digitado o número 
que deseja, pressione NEW LINE ou 
ENTER. 

Note que aparece de novo o cur- 
sor L na linha de baixo, agora entre 
aspas. 

Isto significa que o computador de- 
ve estar esperando a entrada de 
uma cadeia de caracteres, na linha 
20 do programa. Digite um nome: 





e pressione a tecla NEW LINE. Agora 
o programa guardou o nome na va- 
riável correspondente, e vai para a li- 
nha 30, fazendo o cálculo e mostran- 
do o resultado: 





Entendeu? 

Para repetir o programa, basta di- 
gitar de novo a tecla RUN, e tudo se 
repete. Tente colocar várias idades e 
nomes para ver o que acontece. 

Melhor ainda, adicione ao progra- 
ma acima a linha: 

40 GOTO 10 

Desta forma, o programa ficará se 
repetindo indefinidamente. Depois 
de entrar a idade e o nome, ele vai 
mostrar o resultado na tela, e pedir 
nova idade, e assim por diante: 


ARNALDO VIVEU MAIS DE 4380 


DIAS 

JOAQUIM VIVEU MAIS DE 510 
IAS 

FERNANDA VIVEU MAIS DE 6570 
DIAS 

O programa só vai parar quando a 
tela ficar cheia. Neste caso, aparece 
a seguinte mensagem, na última li- 
nha da tela: 

5/30 
que quer dizer: PAREI COM A TELA 
CHEIA NA LINHA 30 


Para continuar o programa, basta 
pressionar a tecla marcada com o co- 
mando CONT (continue), que limpa 
a tela e reinicia tudo de novo na pri- 
meira linha. 

Como parar o programa antes que 
a tela fique cheia? 

Experimente pressionar a 
BREAK. 

Não funciona quando o cursor 
está aparecendo, certo? 

O único jeito é pressionar a tecla 
marcada STOP, e, em seguida, a te- 
cla NEW LINE. 

Seocursor [LJestiver entre aspas, 
só pressionar STOP não resolverá. 

É necessário antes apagar as as- 
pas da esquerda, para que o compu- 
tador não pense que o STOP é ape- 
nas uma cadeia de caracteres. 


tecla 


ialogando 
com o 
Computador 








Os comandos INPUT e PRINT permi- 
tem escrever programas de CONVER- 
SAÇÃO, ou seja, uma espécie de 


“diálogo” entre o computador e o 
usuário. 

Veja, por exemplo, este simpático 
programa: 


10 PRINT'OLA, EU SOU O MICRO- 
COMPUTADOR DE QUE MEU DONO 
TANTO FALA” 

20 PRINT 
30 PRINT'QUAL E O SEU NOME?” 
40 INPUT N$ 
0 CLS 
60 PRINT MUITO PRAZER,”; N$ 
70 PRINT TENHO CERTEZA DE QUE 
VOCÊ VAI GOSTAR DE MIM" 
Na tela o diálogo apareceria assim: 








Você pode imaginar muitos “diálo- 
gos como este. 
Experimente! 


STRUTURANDO 
O PROGRAMA 








sabendo os comandos INPUT, LET 
e PRINT, você já consegue fazer mui- 
tas coisas com o computador. Todos 
os problemas que têm a seguinte for- 
ma: 

— fornecer dados conhecidos para 

um apa 

— procurar o resultado a partir 
destes dados, usando uma ou mais 
fórmulas 

— mostrar o resultado 
podem ser programados facilmente 
em BASIC, usando o computador. 

Nesta seção, vamos aprender co- 
mo estruturar um programa deste ti- 
po, e vamos programar vários exem- 
plos e exercícios, para fixar bem a 
maneira de fazê-lo. 

Você poderá aplicar a mesma re- 
ceita para programas que você mes- 
mo vai bolar depois. 


7 = comando 


Uma coisa muito importante para 
quem deseja aprender a fazer bons 
programas é a documentação. O 
que é isso? 

medida que os programas que 
você faz vão ficando cada vez mais 
compridos, começa a ficar difícil en- 
tendê-los. Mesmo que tenha sido vo- 
cê que os escreveu, depois de alguns 
meses pode acontecer que não se 
lembre mais para que servem algu- 
mas partes do programa. 

A linguagem BASIC tem um co- 
mando cuja única função é ajudar o 
programador a colocar explicações 
em linguagem corrente dentro de um 
programa. Essas explicações são cha- 
madas de DOCUMENTAÇÃO INTER- 
NA DE UM PROGRAMA, 

Esse comando se chama REM. 

REM significa REMARK, em inglês, 
que quer dizer COMENT ÁRIO. 

O comando REM não tem nenhu- 
ma outra serventia além de colocar li- 
nhas escritas, com alguma explica- 
ção ou comentário, dentro de um pro- 
grama. Portanto, ele não é um co- 
mando EXECUTAVEL, ou seja, não é 
executado pelo computador, como os 
comandos LET e PRINT, por exemplo. 





O comando REM é escrito da se- 
guinte maneira: 

23 REM COMENTÁRIO 

Depois do comando REM, na mes- 
ma linha, podemos colocar o que qui- 
sermos (inclusive caracteres gráficos). 

O comando REM é útil para muita 
coisa: 

— identificar o nome do progra- 
ma, quem o escreveu, em que data 
etc. Esta parte do programa geral- 
mente é colocada no começo, e é 
chamada de CABEÇALHO DO PRO- 
GRAMA. Quando você tiver muitos 
programas gravados em fita, você sa- 
berá como esse cabeçalho é necessá- 
rio para evitar confusões... 

— verificar para que servem as va- 
riáveis dentro do programa 

— “identificar as diferentes seções 
de um programa 

— colocar linhas de separação en- 
tre as partes de um programa 

Todos esses recursos são úteis para 
facilitar a leitura e o entendimento de 
um programa, tanto para você como 
para os outros. Você entenderá me- 
lhor a utilização do REM no progra- 
ma abaixo: 


PROBLEMA 

Fazer um programa para converter 

dólares em cruzeiros, à taxa do dia: 
SOLUÇÃO 
À maneira mais fácil e direta de fa- 
zer este programa seria: 
20 INPUT TAXA 
40 INPUT VALOR 
60 LET CRUZ = TAXA + VALOR 
80 PRINT CRUZ 
90 GOTO 40 

Como você percebe, o programa 
solicita apenas uma vez, na linha 20, 
a taxa atual do dólar (e a armazena 
na variável TAXA). Depois solicita a 
entrada do valor em cruzeiros (e a ar- 
mazena na variável VALOR, na li- 
nha 40). Finalmente, calcula, na li- 
nha 60, e mostra o resultado, em cru- 
zeiros, na linha 80. À linha 90 faz o 
programa perguntar o novo valor em 
cruzeiros, para ser convertido, e as- 
sim por diante, até pressionarmos a 
tecla STOP. 

Este programa é bem simples, mas 
tem as três partes fundamentais de 
qualquer programa de resolução de 
problemas: 

— ENTRADA (linhas 20 e 40) 
— CÁLCULO (linha 60) 
— SAIDA (linha 80) 

Note que a pessoa que for usá-lo 
precisa saber para que ele serve, 
pois o programa não dá nenhuma 
“dica” sobre isto, sobre que valores 
devem ter entrada, e quando, etc. 

Por isso, um programa realmente 
útil tem comandos com mensagens 
de instruções para o usuário, e verifi- 
cação dos resultados. Veja como fica 
muito melhor assim: 
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10 PRINT'TAXA ATUAL DO DOLAR? 

20 INPUT TAXA 

30 PRINT'VALOR EM DOLARES?” 

40 INPUT VALOR 

60 LET CRUZ = TAXA + VALOR 

80 PRINT VALOR EM CRUZEIROS ="; 

CRUZ 

90 GOTO 30 

Veja que o programa melhora bas- 

tante, pois informa ao usuário que va- 
lores ele tem que digitar, e depois ex- 
prime o resultado com uma mensa- 
gem de esclarecimento. Na tela fica 
assim: 
para completar o nosso programa, 
vamos colocar todos os comentários 
com os comandos REM, documentan- 
do-o adequadamente: 


1 REM ee e e e e e 

2 REM * PROGRAMA CONVERTE * 
3 REM + R.SABBATINI * 

4 REM + 12.SET.84 * 

a REM se e 

6 REM 

7 REM +** ENTRADA DE DADOS ++ 
8 REM 

10 PRINT'TAXA ATUAL DO DÓLAR?” 
20 INPUT TAXA 

25 PRINT TAXA 

30 PRINT'VALOR EM DOLARES?” 
40 INPUT VALOR 

45 PRINT VALOR 

54 REM 

50 REM *** CÁLCULO +** 

55 REM 

60 LET CRUZ = TAXA * VALOR 


64 REM 
65 REM +** RESULTADO +** 
66 REM 


70 PRINT 
80 PRINT'VALOR EM CRUZEIROS ="; 
CRUZ 
90 GOTO 30 
Note que foram adicionadas as se- 
guintes linhas: 
1 a 5% cabeçalho 
6a8, Maeda 66 b identifica- 
ção das seções 
95 e 45 b mostram na tela os valo- 
res de entrada, para melhor referên- 
cia 
O programa acima é bastante legí- 
vel e de fácil modificação, mesmo 
por quem não O desenvolveu. Às se- 


ções de entrada, cálculo e saída são 
facilmente identificáveis. 


onclusões 
sobre o REM 





Ds 


O comando REM é muito útil, como 
você viu. 
Entretanto existem algumas coisas 


é 8) 


. de que precisamos lembrar, quando 


formos usá-lo: 

1. O comando REM não é uma or- 
dem para o computador. Tudo o que 
estiver escrito nele (inclusive coman- 
dos válidos em BASIC) tica como que 
invisível para o computador e visível 
só para você. 


2. Os comandos REM ocupam espa- 
ço de memória no computador. Se O 
programa for muito longo e não cou- 


8.1. Defina: 
VARIÁVEL 


E ol e 20 DL DS E CRT PR SRT 


8.2. Qual é a vantagem principal de 
se utilizar variáveis em um progra- 
ma BASIC? 


DN DUBR ERRO ei Ep o o o Dari O O adiados on 


8.4. Marque com V se a afirmativa 
tor verdadeira, e com F, se for falsa: 
() o comando REM é interpretado e 
executado pelo computador 
() os comandos REM de um progra- 
ma não ocupam a memória 
() o comando INPUT pode ser usa- 
do sem uma variável 
() o comando INPUT pode ser usado 
para entrada de números e nomes 
( ) quando o computador encontra 
um comando INPUT, interrompe O 
processamento de um programa e 
fica esperando uma entrada 
() o comando INPUT solicita dados 
pelo teclado 
() o comando LET serve apenas pa- 
ra fazer cálculos 


8.5. Assinale quais os nomes de va- 
riáveis que são corretos (C) e erra- 


dos (E) e explique por quê: 
TK 85 


1983 
ABCDI23 
COISAS 


ber na memória, é necessário limitar 
o número de REMs ou tirá-los. 


3. Se você vai desenvolver um pro- 
grama muito longo, tome como hábi- 
to ir escrevendo os comentários REM 
em seu interior à medida que vai di- 
gitando as linhas de comandos. 


4. Os comentários REM não são a 
única forma de documentação. De- 
pois veremos outras. 


8.6. Que resultado vai mostrar O 
computador no programa abaixo? 


(Explique por que, para cada linha 
RINT): 


8.7. Escreva um programa que per- 
gunte o seu nome € depois encha a 
tela com ele. 


8.8. Faça um programa para entra- 
da de três notas pelo teclado, e de- 
pois calcule a soma e a média sim- 
ples das notas. Coloque também o 
nome do aluno. 


8.9. Qual é a vantagem principal de 
se usar o comando INPUT em um 
programa em BASIC? 


8.10. Cite três utilidades do coman- 
do REM em um programa: 

mu 

A 

3. 


8.11. Quais são as três partes princi- 
pais de um programa para resolver 
um problema de cálculo? 

L. 

2. 

3. 


as 
ja 








4 OLUÇÃO DOS PROGRAMAS PROPOSTOS 


Abaixo, a solução dos programas propostos no capitulo 5 deste livro. 


TRTIE 


PÁGINA 21 
6.12. Faça um programa para colocar na 
tela uma lista numerada de três times de 
futebol. Por exemplo: 

1 PALMEIRAS 
2 BOTAFOGO 
3 FLAMENGO 


Resposta: 


10 PRINT “1”, “PALMEIRAS”. 

“20 PRINT “2”, “BOTAFOGO” 
30 PRINT “3”, “FLAMENGO” 
40 STOP 


6.13. Faça um programa para colocar um 
sinal + em cada canto da tela (dica: use o 
comando PRINT AT). 





PAGINA 23 

1. Faça um programa para colocar na tela 
as palavras TIC e TAC, uma em cada li- 
nha, até encher toda a tela. 


Resposta: 


10 PRINT “TIC” 
20 PRINT “TAC” 
+30 GOTO 16 


| di 
RR E 
ii 
PÁGINA 30 


8.7. Escreva um programa que pergunte o 
seu nome, e depois encha a tela com ele. 


Resposta: 


10 PRINT “QUAL É O SEU NOME?” 
“24 INPUT NOME $ 

30 CLS 

40 PRINT NOME $; “ ”; 

5] GOTO 46 


8.8. Faça um programa para entrada de 
três notas pelo teclado, e depois calcule a 
soma e a média simples das notas. Colo- 
que também o nome do aluno. 


Resposta: 


1$ REM rrererereeerena nas 
20 REM * MEDIA DE 3 NOTAS *+ 
REM e e e e 
40 REM 
50 REM +** ENTRADA DAS NOTAS +++ 


2. Modifique o programa acima para es- 
crever em toda a tela, mas com as pala- 
vras TIC e TAC unidas. 


Resposta: 


16 PRINT “TIC” 
20 PRINT “TAC” 
36 GOTO 16 


STR 


66 REM 

65 PRINT “CALCULO DE MEDIA” 

68 PRINT 

7Ó PRINT “ENTRE 3 NOTAS:” 

84 INPUT N1 

94 PRINT “NOTA 1 = ";N1 

106 INPUT N2 

116 PRINT “NOTA 2 = "; N2 

115 INPUT N3 

126 PRINT “NOTA 3” = ; N3 

130 REM 

140 REM *+*+* CALCULA SOMA E 
MEDIA +++ 

156 REM 

166 LET SOMA = N1 + N2 + N3 

176 LET MEDIA = SOMA/3 

180 REM 

190 REM *** MOSTRA RESULTADO * ** 

206 REM 


216 PRINT 

220 PRINT “SOMA = "; SOMA 
230 PRINT “MEDIA = ”; MEDIA 
246 STOP 
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Exemplo de execução: 





digite a 1º nota digite a 3º nota 





digite a 2º nota resultados 
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fuma DE CÓDIGOS INDICADORES DE ERROS 





Apresentamos abaixo uma tabela completa com to- 
dos os códigos indicadores de erros que podem apa- 
recer durante a digitação ou a execução de um pro- 
grama. Lembre-se que este código sempre aparece na 
linha de baixo da tela, mostrando também o número da 
linha em que ele ocorreu. Exemplo: 


SAE 


Significa: ocorreu o erro número 5, na linha 15. 

O erro número 5 significa: não há mais espaço na 
tela para continuar a listagem. Na coluna SITUA- 
ÇÕES você poderá ver com quais comandos pode 
ocorrer este erro. No nosso exemplo, pode ocorrer 
com PRINT, LIST etc. 

Algumas vezes, a tabela também indica o que fazer 
para sair do erro. No caso do erro número 5, você de- 
verá digitar o comando CONT para limpar a tela. 


CÓDIGO SIGNIFICADO SITUAÇÕES 


Não houve erro. 
Execução bem sucedida ou salto 


Qualquer 


para uma linha de maior número 
que qualquer outra existente. 





NEXT 





À variável de controle não existe 
(não foi estabelecida por uma 
instrução FOR), mas existe uma 
outra variável com o mesmo no- 
me. 


À linha indicada usa uma variá- Qualquer 
vél não definida previamente por | 
uma instrução LET ou INPUT 

Para matrizes isso acontecerá se 







estas forem usadas antes de ser 
dimensionadas pela instrução 
DIM. E, para uma variável de 


for usada antes de ter sido defini- 
da como variável de controle por 
uma instrução FOR, e se-não 
houver nenhuma variável sim- 





controle, isso ocorrerá caso ela 
ples com o mesmo nome. 


] 

2 

3 A matriz não contém o elemento 
especificado. 
Caso o índice esteja fora de faixa 
(isto é, seja negativo ou acima de 
65535), ocorrerá o erro B. 

4 


Matrizes 





Espaço insuficiente na memória. LET, INPUT, 
Observe que o número de linha DIM, PRINT, 

na indicação (após o /) poderá LIST, PLOT, 
estar incompleto na tela, devido UNPLOT, FOR, 
à falta de memória; assim, por GOSUB. 
exemplo, 4/20 poderá surgir co- Às vezes, durante 
mo 4/2. a avaliação de 


funções. 


as 


SIGNIFICADO 


Não há mais espaço na tela. 
CONT criará espaço, limpando a 
tela. | 


CÓDIGO 
















PRINT, LIST, 
PLOT, UNPLOT. 













Qualquer cálculo 
aritmético. 


Resultado fora dos limites do 
computador. Os cálculos produ- 
ziram um número superior à 


10%, 


Você tentou um comando INPUT 
não permitido. | 













Instrução STOP executada. 
CONT fará a execução começa 
da próxima linha. 


A Argumento inválido para certas SOR, LN, ASN, 
funções. ACS 


Número inteiro fora da faixa 
(—655 34 a 65535). 

















GOTO, GOSUB, 
LIST, PAUSE, 

PLOT, UNPLOT, 
CHR$, PEEK, 

USR. Quando de 
um acesso a uma 
matriz 











O texto do argumento (de string) 
de VAL não forma uma expres- 
são numérica válida. 










Ao fim de qual- 
quer instrução ou 
em LOAD, SAVE, 
PRINT, LIST ou 


Programa interrompido por: 
1. Tecla BREAK pressionada ou 
2. Um STOP foi digitado no te- 










Não utilizado 


F O nome fornecido para o pro- | 
grama está em branco. 

















RESUMO 


Vamos rever agora todos os comandos e instruções que você aprendeu até aqui, 
em ordem alfabética, para facilitar o seu trabalho posterior. 


Na relação abaixo, 
V representa uma variável; 
n representa expressão numérica que é arrendondada para o número inteiro mais 


próximo; 


e representa uma expressão. 


- Note que expressões arbitrárias são permitidas em qualquer lugar, exceto para nú- 
mero de linha no início da instrução. | 
Todas as instruções, exceto INPUT, podem ser usadas tanto em linhas imediatas co- 


mo em linhas de comando. 

CONT Continua a execução após um BREAK ou STOP. Normalmente é di- 
gitado pelo teclado (não é colocado dentro de um programa). 

CLS Limpa a tela. 

GOTO n Salta para linha n (ou, se não existe, para a que vem depois dela). 
Exemplo: GOTO 26 

INPUT V Pára e espera que seja feita uma entrada de dados. 
lição não pode ser usado diretamente pelo teclado, pois ocorrerá 
erro 8. 
Se o primeiro caractere em uma linha de INPUT é STOP, o progra- 
ma pára com denotação D. Exemplo: INPUT AS. 

LET V=e Atribui o valor e à variável v. LET não pode ser omitido. Uma variá- 
vel simples é indefinida, até figurar em uma instrução LET ou 
INPUT. | 
Exemplo: 
LET X= A+ 25/3 

LIST | Lista o programa na tela, começando na 1º linha. 

LIST n Lista o programa na tela, começando na línha n. Ocorrem erros 4 ou 
5, se a listagem for muito longa para a tela. Exemplo: LIST 

NEW Apaga o programa e todas as variáveis, para poder colocar outro na 
memória. 

PRINT Mostra algo na tela (o que estiver indicado depois da palavra 


PRINT), e que é chamado item de impressão. 

O item pode ser: 

(1) Vazio, isto é, nada aparece tag pane caso é mostrada na tela 
uma linha em branco. plo: 

(2) Uma expressão numérica. É mostrado o resultado da expressão. 
Exemplo: PRINT 25 + 14 

O resultado é impresso em notação decimal ordinária de até 8 dígitos 
significativos e sem zeros após o ponto decimal. Um ponto decimal 
no início é sempre seguido de um zero. 

(3) Uma expressão entre | É mostrado exatamente o que apare- 
ce. Exemplo: PRINT “ M DIA”. 

(4) ATm,n À posição de impressão é mudada para linha.m (con- 
tando do topo), coluna n (contando da esquerda). Se Iml = 22 ou 23, 
resulta erro 5 

(5) TAB n 


RUN 

RUN n 
STOP 

INT n 

LEN String 
LN Número 


PI 
SGN n 


SQR n 
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A posição de impressão é movida para coluna n, permanecendo na 
mesma linha, a menos que isso envolva retorno na mesma linha; nes- 
te caso, move-se para a próxima linha. Exemplo: PRINT AT 10, 20, 
as 5 

Um ponto e vírgula entre dois itens imobiliza a posição de impres- 
são, de forma que o segundo item siga logo após o primeiro. 


Exemplo: 

PRINT “A=; 25 

Uma vírgula, por outro lado, move a posição de impressão de, no 
mínimo, um lugar; e, após isso, tantos quantos forem necessários pa- 
ra deixá-la na coluna O ou 16, introduzindo uma nova linha, se ne- 
cessário. Exemplo: PRINT “JOÃO”, “MARIA” 

Ao fim de uma instrução PRINT, se ela não terminar por ponto e vir- 
gula ou vírgula, uma nova linha será colocada. 

Erro 4 (fora da memória) pode ocorrer com 3k ou menos memória. 
Erro 5 significa que a tela está repleta. 

Em ambos os casos, a solução é digitar CONT, que limpará a tela e 
continuará. | 


Identifica comentários em um programa. (Abrev. REMark); ignora o 
restante da linha. 


Executa um programa a partir da primeira linha. 
Executa um programa a partir da linha m. Exemplo: RUN 20 
Interrompe a execução do programa, mostrando a mensagem 9. 


Função para obter a parte inteira de um número. Exemplo: PRINT 
INT 23.5 (sempre arredondando para menos). 


Comprimento da string. 

Logarítimo natural (na base e). Erro Asex<0;0sex%o0; 
Isex =0 

NOT tem prioridade 4. 

Função que retorna o valor do número 1 (3,14159265...). 
Função que determina o sinal de um número. 

Nº Resultado 

positivo 1 

zero ê 

negativo -1 

Exemplo: 

LET X = SGN (-25) 

Calcula a raiz quadrada do número n. Exemplo: PRINT SQR (24). 
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COMPUTADOR 

TAMBÉM SABE 
DECIDIR 





Até agora, você aprendeu como 
programar o computador para: 


Programa Comando 
entrada de dados: INPUT 
cáculos LET 
E lindos na tela: PRINT 


Estes comandos são muito úteis 
para fazer uma infinidade de 
programas. Com elas, podemos 
transformar o computador em uma 
sofisticada calculadora 
matemática, capaz de resolver 
problemas de cálculo de muitos 
tipos. 


Entretanto, o computador pode 
fazer muito mais do que isso. Ele 
pode, por exemplo, aprender a 
tomar decisões sozinho 


O comando que permite fazer 
isto em BASIC se denomina IF. 
Em inglês, IF significa SE (ou seja, 
expressa uma determinada 
condicão). Por exemplo: 


300 IF X = O THEN PRINT 
“O NUMERO E IGUAL A ZERO” 


Este comando está dando a 
seguinte ordem para O 
computador: 


SE o número X for igual a 0, 
ENTÃO imprima a mensagem. 


A palavra THEN significa 
ENTÃO, em inglês, e é sempre 
usada em conjunto com o IF. 


O comando IF manda o 
computador tomar uma decisão 
muito simples. Ele ordena o 
computador a fazer uma 
determinada operação, se a 
condição testada for verdadeira. 


No exemplo acima, se o número 
contido na variável X for igual a 


O, a condição testada (X = 0) 
será verdadeira, e o computador 
mostrará na tela a mensagem: 


O NUMERO E IGUAL A ZERO 


E se a condição não for 
verdadeira? 


Então o computador não 
obedecerá a instrução PRINT na 
linha 300 e passará para a linha 
seguinte do progama: 


a condição 


300 = O THEN => PRINT: "NUMERO E IGUAL A ZERO” 


y 


siga este caminho, se 
a condição for falsa 


Para entender melhor, seria 
como se você estivesse andado 


linha seguinte 


siga este caminho, se 
a condição for verdadeira 


por uma estrada e tia a 
uma enc 


PRINT “O NUMERO E ZERO” 
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Você tem dois caminhos para 
seguir, dependendo da decisão 
que tomar. Se o que estiver escrito 
na placa é verdadeiro, vá para a 
direita. Se for falso, vá para a 
esquerda* 


Vamos ver agora um programa 
bem simples, para mostrar como 
funciona o comando IF numa 
situação real. Neste programa, a 
pessoa digita um número qualquer 
no teclado, e o computador 
informa se ele é zero, positivo ou 
negativo. 


10 REM — PROGRAMA PARA TESTAR SE UM NUMERO 
20 REM — E ZERO, POSITIVO OU NEGATIVO 


30 REM 
40 REM 
50 REM — ENTRADA DE UM NUMERO 
60 REM 
70 PRINT “ENTRE UM NUMERO E EU DIGO QUE SINAL ELE” 
80 PRINT “TEM” 
90 INPUT X 

100 REM 

110 REM — TESTA O NUMERO 

129 REM 

125 PRINT 


130 IF X = O THEN PRINT “O NUMERO E ZERO” 
140 IF X > O THEN PRINT “O NUMERO “X;” POSITIVO” 
150 IF X < O THEN PRINT “O NUMERO ";X;" E NEGATIVO” 
160 PRINT 

170 GOTO 90 


Vamos ver como funciona este 
programa. Depois de digitar o 


comando RUN, aparece na tela 





Então, se eu digitar, por exemplo, c 
número - 9: 








Se eu digitar agora o número 34: 





E assim por diante. 


Para interromper o programa, 
podemos pressionar a tecla STOP 


Outro uso bastante comum do 
IF é para assinalar quando uma 
determinada parte de um 
programa deve ser terminada e 
outra parte deve ser iniciada. 


Veja o programa abaixo: 


10 REM — MAQUINA DE SOMAR 


20 REM 
30 REM 
40 REM — INSTRUCOES 
50 REM 


60 PRINT “DIGITE OS NUMEROS QUE QUISER SOMAR” 
70 PRINT “TODA VEZ QUE APARECER A LETRA L NA” 
80 PRINT "PARTE DE BAIXO DA TELA” 


90 PRINT 


"100 PRINT “PARA OBTER A SOMA, DIGITE 0” 


110 PRINT 
120 REM 


130 REM — ZERAÃ O SOMADOR 


140 REM 
150 LET SOMA = 0 
160 REM 


170 REM — ENTRADA DA PARCELA 


180 REM 
190 INPUT D 
200 REM 


210 REM — SE FOR ZERO, PULA PARA 350 


220 REM 


230 IF D = O THEN GOTO 350 


240 REM 


250 REM — SE NÃO FOR, SOMA O DADO 


260 REM 
265 PRINT D 


270 LET SOMA = SOMA + D 


280 REM 


290 REM — E VOLTA A 190 DE NOVO 


300 REM 
310 GOTO 190 
320 REM 


330 REM — FIM DA ENTRADA. MOSTRA SOMA 


340 REM 
350 PRINT 


360 PRINT "SOMA = "SOMA 


370 STOP 


O programa funciona como uma 
máquina de somar. O número de 
parcelas a serem somadas não é 
conhecido de antemão. Assim, a 
parte do programa entre as linhas 
190 e 310 forma uma alça de repe- 
fição, que serve para pedir os valo- 
res para o usuário (através do co- 
mando INPUT, na linha 190), e so- 


má-los usando o contador SOMA. 


Para interromper esta alça, 
quando todos os números tiverem 
sido digitados, tenho que informar 
isso de algum modo ao computa- 
dor. Poderíamos, neste caso, digi- 
tar o número zero. Um teste, den- 
tro do programa, desvia o proces- 
samento para outra parte (linha 
350 a 370), que vai mostrar o resul- 
tado. 


Vamos ver um exemplo de utili- 
zação do programa: 





Se eu digitar os números 12, 7, 
15 e 35, um após o outro (pressio- 
nando a tecla NEW LINE ou EN- 
TER, após cada um), teremos a se- 
guinte tela: 





Agora, se quisermos terminar 
esta parte do programa e ver o re- 
sultado da soma (linhas 350 a 370), 
vamos digitar O e ocorrerá o se- 
guinte: 





Veja quais seriam os números ar- 
mazenados nas variáveis D e SO- 
MA, no exemplo acima. 


Número Variável Variável” 
digitado D SOMA 
12 12 12 
Vs 7 19 
15 RAS "ga 
35 35 69 
oo 0 : 69 

e acaba... 
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Se eu não tivesse a linha de teste 
com o IF, seria impossivel dizer ao 
computador quando ele deveria 
mostrar o resultado da SOMA. 


" 


a 


Note como funciona a linha de 
teste 


230 IF D = O THEN GOTO 350 


Esta frase tem o seguinte signifi- 
cado em português: 


Se o valor de D for igual a zero, 
ENTÃO vá para 350. 


Quando o computador encontra 
esta linha de programa, o que fará 
ele? 


1. Compara o número armazenado 
na variável D com zero; 


2. se este número for igual a zero, 
então obedece o comando que está 
na mesma linha que o IF, logo de- 


pois do THEN, ou seja, GOTO 350; 


3. se este número não for igual a 
zero, continua seguindo o progra- 
ma, a partir da linha seguinte (ou 
seja, a linha 240). 


Mais usos para o IF 


O comando IF é interessante 
porque permite testar informações 
de muitas maneiras diferentes. Ele 
permite, por exemplo, verificar se 
a resposta a uma pergunta feita ao 
computador está correta ou não. 


Vamos entender como funciona 
este programa, passo a passo: 





— linha 60: o programa mostra a 
pergunta, no alto da tela 


— linha 70: fica esperando a res- 
posta digitada no teclado, e a 
guarda na variável chamada 


RESPOSTAS 





— linha 110: compara o que está 


em RESPOSTAS com a constan- 
te ROMA. 


Se for verdadeiro, ou seja, se a 
pessoa digitou ROMA, ENTÃO pu- 
la para a linha n. 200, para dar os 
parabéns. 


— linha 150 a 160: limpa a tela 
(CLS), diz que errou, e mostra a 
resposta correta. Depois pára, 
interrompe o programa. 


— linha 200 a 220: limpa a tela, e 
dá os parabéns. Depois inter- 
rompe o programa. 


Como funciona o comando IF? 


Com os exemplos acima, já po- 
demos deduzir alguns principios 
sobre o funcionamento do coman- 


do IF: 


— uma linha com o comando IF é 
composta de quatro partes: 


1. a palavra IF 


2. uma comparação entre duas coi- 
sas 


3. a palavra THEN 


4. uma linha com um comando que 
deve ser executado, se o resulta- 
do da comparação for VERDA- 
DEIRO 


As palavras IF e THEN são fixas, 


ou seja, sempre devem constar na 


Vamos ver o que o BASIC permi- 
te que coloquemos nos itens 2 e 4. 

O item 2 é chamado de CONDI- 
ÇÃO, ou ainda de CLÁUSULA 
LÓGICA. 

O item 4 é chamado de AÇÃO 
ou CONSEQUÊNCIA. 


À condição 


Em geral, a cláusula lógica é es- 
crita de tal forma que permita uma 
comparação. 


Por exemplo: 
IFX = 5 THEN... 


testa se o valor da variável numéri- 
ca X é igual a 5 


IFA > BTHEN.... 


testa se o valor da variável numéri- 
ca À é maior do que o valor da va- 
riável numérica B 


IF 13 + (25-3)/2 < CTHEN ... 


testa se a expressão aritmética a es- 
querda é menor do que o valor da 
variável numérica C 


IF R$ = “SIM” THEN ... 


testa se a palavra armazenada na 
variável alfanumérica R$ é igual à 
constante alfanumérica SIM 


Só existem dois resultados possi- 
veis para uma expressão lógica: 
verdadeiro ou falso. 


Se a EXPRESSÃO resulta VER- 
DADEIRA, a AÇÃO é executada. 

Se a EXPRESSÃO resulta FAL- 
SA, a AÇÃO não é executada. 


Os sinais de igual (=), maior (>) 
e menor ( <) são chamados de ope- 
rações relacionais, ou seja, permi- 
tem formar uma expressão que con- 
tenha uma igualdade ou uma desi- 
gualdade (como na matemática). 


Às seguintes ope oa relacio- 
nais são permitidas em BASIC: 


igual 

menor que 

maior que 

menor ou igual a 
maior ou igual a 
diferente-de (não é 


igual) 


AVAVAM 


Vu 


Para digitar estas operações no 
teclado, note que existe algumas te- 
clas rotuladas com estes sinais: 


tecla L = 
tecla N < 
- tecla M > 
| tocia R < = 
tecla 7 > = 
tecla T <> 


Para entrar a operação, mante- 
nha pressionada a tecla SHIFT, en- 
quanto pressiona a tecla correspon- 
dente ao sinal desejado. 


Preste atenção em uma coisa: vai 


haver erro se você tentar obter o si- 


nal > = pn a sia > e 
depois a tecla = 


Este sinal só pode ser obtido cor- 
retamente por meio de sua tecla es- 
pecial, e assim todos os outros. 


Uma comparação lógica deve 
sempre ter variáveis ou constantes 
do mesmo tipo, na mesma expres- 
são. Caso contrário, ocorrerá erro. 


Por exemplo: 


IF COMIDA = “BATATA” 


não está correto, porque estamos 
tentando comparar uma variável 
numérica com uma constante alfa- 
bética. 


Ou então: 
IF X$ > 24 THEN ... 


também não dará certo, porque es- 
tamos colocando na mesma expres- 
são lógica uma variável alfanuméri- 
ca e uma constante numérica. 


À ação 


O que vem na mesma linha do IF, 
logo depois da expressão lógica, é a 
ação ou consequiência a ser seguida, 
se ela for verdadeira. 


No BASIC do TK-85, bem como no 
de todos os outros microcomputadores 
compatíveis com a linha Sinclair, a 
ação pode ser qualquer comando váli- 
do em BASIC: 


Você já conhece alguns, que podem 
ser colocados sem problemas depois 
de um comando IF: 


são os mais usados. 


Eis aqui alguns exemplos: 


IF SEXOS = “FEMININO” THEN 
GOTO 300 
IF T 20 > THEN STOP 


IF S < O THEN PRINT “O NUMERO 
E NEGATIVO” 

IF R <> 2 THEN INPUT P$ 

IF ANOS = “BISSEXTO” THEN LET 
DIAS = 366 

IF LINHAS > 20 THEN CLS 

IF FIM = O THEN RUN 


Vamos ver mais alguns eXemplos do 
uso do comando IF: 


EXEMPLO 1: um programa'para xin- 
gar uma pessoa! 
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Como vai ser o resultado deste pro: 
grama? | 


O que acontecerá se a pessoa digi- 
tar de uma forma errada o sexo, ou se- 
ja, se não for exatamente igual a MAS. 
CULINO ou FEMININO? 


Exemplo 2: programa para cálculc 
de raiz quadrada. 


Vamos supor que queremos fazer 
um programa para calcular a raiz qua- 
drada de um número qualquer. Que- 
remos que o programa funcione assim: 
primeiro, a pessoa digita no teclado o 
número que desejar. Depois, o pro- 
grama calcula a raiz quadrada e mos- 
tra o resultado na tela. Em seguida, 
pede outro número à pessoa, e assim 
por diante. 


E muito fácil entender como funcio- 


na O programa: 
— nas linhas 90 E 100, o programa so- 
licita o número a ser calculado; 

— na linha 110, o número digitado é 
impresso na mesma linha; 

— nas linhas 140 e 150, o programa 
calcula e mostra a raiz quadrada; 

— na linha 190, o programa é desvia- 
do para o comando INPUT, de modo a 
possibilitar novo cálculo. 


O GOTO 90 na linha 190 cria uma 
“alça sem fim”, ou seja, o programa 
sempre vai se repetir, infinitamente. 
Quando você quiser parar de utilizar o 
programa, basta pressionar a tecla 
STOP, com o programa na linha 90, ou 
pressionar a tecla BREAK, quando ele 
estiver calculando. Isto você já apren- 
deu. 


O programa ficaria muito melhor, 
entretanto, se não fosse necessário 
pressionar estas teclas para 
interrompê-lo. Poderíamos fazer com 
que o computador “soubesse” quando 
deveria parar. 





Uma sugestão interessante seria es- 
ta: se a pessoa entrar um valor deter- 
minado (por exemplo, zero), o progra- 
ma parará automaticamente. 


Para isto, precisamos testar se o va- 


lor armazenado na variável de entrada 
D é igual a zero, certo? 
105 IF D = O THEN STOP 


Agora, nosso programa ficará as- 
sim: 


10 REM - PROGRAMA PARA CALCULAR RAIZ QUADRADA 
20 REM - PARA O COMPUTADOR TK - 85 


30 REM 
40 REM 





50 REM — ENTRADA DE UM NUMERO 


60 REM 


70 PRINT “CALCULO DA RAIZ QUADRADA” 


BO0PRINT"========= 


101 REM 


102 REM — TESTA SE O VALOR E ZERO 


103 REM 
105 IF D = O THEN STOP 
115 REM 


120 REM — CALCULO E IMPRESSAO 


130 REM 
140 LETR = SOR (D) 


150 PRINT “RAIZ QUADRADA = ";R. 


160 REM 


170 REM — VOLTA PARA O COMECO, PARA 


OUTRO NUMERO 
180 REM 


Agora parece que o programa já es- 
tá bom, mas existe ainda outro proble- 
minha a ser resolvido. 


Não existe a raiz quadrada de um 
número negativo. 


Assim, se você digitar o número -5, 
por exemplo, o programa será inter- 
rompido, e aparecerá a seguinte men- 
sagem de erro: 





Isto quer dizer que a função na linha 
indicada (140) foi usada com um argu- 
mento (isto é, dado de entrada) indevi- 
do ou errado (não permitido ou impos- 
sível de ser calculado). 


Não é conveniente deixar ocorrer 
este tipo de interrupção em um pro- 
grama, porque às vezes a pessoa que 
está operando não sabe o que significa 
aquela mensagem de erro nem como 
voltar a utilizar o programa. 


O ideal é que o próprio programa se 
encarregue de verificar se o número 
digitado pode ou não ser usado. 


Para que façamos isto, é necessário 
realizar um teste. No nosso exemplo, 
teríamos que testar, dentro do progra- 
ma, se o número digitado pela pessoa 
é válido ou não. 


Se o número fosse incorreto, o pro- 
grama poderia mostrar uma mensa- 
gem de advertência (por exemplo: 
NÃO PODE SER UM NUMERO NF- 
GATIVO, ou outra qualquer). 


Por exemplo, poderíamos colocar 
em nosso programa a seguinte linha, 
logo após aquela que serve para entrar 
o número a ser calculado (linha 100, 
com o comando INPUT): 


109 IF D < O THEN GOTO 250 


Esta linha permitirá interceptar to- 
dos os números negativos. Se a cláusu- 
la 


D<oO 


for verdadeira, o programa pulará 
para a linha 250, onde será mostrada 
uma mensagem de advertência, para 
indicar o erro cometido. 


Se ela for falsa (ou seja, o número é 
maior do que zero), o programa pulará 
para a linha seguinte (110), e o restan- 
te do cálculo será realizado. 


Agora, com todas as modificações, 
nosso programa ficará assim: 
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10 REM - PROGRAMA PARA CALCULAR RAIZ QUADRADA 
20 REM - PARA O COMPUTADOR TK - 85 | 

30 REM | 

40 REM 

50 REM — ENTRADA DE UM NUMERO 

GOREM 

70 PRINT PRAIA GU LAS DA RAIZ QUADRADA" 


JOLREM 

102 REM — TESTA SE O VALOR E ZERO 

103 REM | 

105 IF D = O THEN STOP 

106 REM | 
107 REM — TESTA SE O VALOR E NEGATIVO 
108 REM 

109 IF D<0 THEN GOTO 250 

110 PRINTD; 

115 REM 

120 REM — CALCULO E IMPRESSAO 

130 REM 

140 LET R = SOR (D) 

150 PRINT "RAIZ QUADRADA = ",R 

160 REM | 

170 REM — VOLTA PARA O COMECO, PARA OUTRO NUMERO 
180 REM | 

190 GOTO 90 

200 REM 7 

210 REM — MENSAGEM DE ERRO 

220 REM 

250 PRINT "NÃO PODE SER UM rc NEGATIVO” 
260 GOTO 90 | 


Coloque este programa no compu- 
tador e teste com alguns números posi- 
tivos e negativos para ver se ele fun- 
ciona. 





7. Faça um programa para testar se o 
resultado da divisão de um número 
por outro tem resto maior do que ze- 
To. 


Dica: 10 INPUT N1 
20 INPUT N2 
30 LET D= N1/N2 
40 IF... 
Use a função INT (inteiro de) para 
verificar. 


8. Explique o que faz o programa 
abaixo com os valores de entrada (À e 
B) indicados. 


10 INPUT À 

20 INPUT B 

MM LET N=Q 

40 LETN=N+ 

S0IFN=B THEN STOP 

60 LET A=A+2 

70 PRINT A; * ": 

80 GOTO 40 

Valores: a - A=2, B=5 
Db: Am4 Bel 
c-A=0, B=10 
G- Asi, B=il 


9, Estude o programa abaixo e escre- 
va as mensagens que serão escritas na 
tela quando o programa for executa- 
do: 


10 PRINT "CURSO DE PROGRAMA- 
pes BASIC” 

GOTO 75 
o “EDITORA ABRIL CULTU- 


40 PRINT 

50 GOTO 140 

60 PRINT "BASIC E MUITO FACIL” 
70 GOTO 90 

75 PRINT "APRENDER"; 

80 GOTO 60 

9% LET A=8 

100 IF A=8 THEN 110 

il PRINT BASIC E MUITO DIFI- 


110 STOP. 
140 PRINT “FIM DA MENSAGEM” 


Responda também: quais são as li- 
nhas do programa que nunca serão 
executadas. Por quê? 


10. F aça um programa que imprima 
na tela os números de 10 a 20. 


Ni 


Como vimos na primeira parte des- 
te capítulo, um dos usos principais 
para o comando IF é observado na 
contagem e repetição de certos seg- 
mentos de um programa (ou seja, O 
que chamamos de alças de repetição). 

Para isto, ele é empregado em con- 
junto com uma variável chamada 
acumuladora ou contadora, que ser- 
ve para registrar quantas vezes cada 








poderia ser programado da seguinte 
maneira: 


IO LETN=0 

20 LETN=N+1 

30 PRINT N;" *; 

40 IF N< 10 THEN GOTO 20 
50 PRINT “FIM” 


coisa foi repetida. 


Por exemplo: um programa para 
contar de 1 a 10, mostrando na tela o 


seguinte resultado: 


Vamos entender melhor como funciona este programa: 


Io LET N=0 


0 LETN=N+I 


30 PRINT N;" *; 


40 IF N< 10 THEN GOTO 20 


50 PRINT “FIM” 


N será a variável contadora. Por isso, 
devemos inicializá-la (no caso, igualá-la a 
zero). Isto deve ser feito antes de se come- 
çar a alça de repetição. 


Aqui é o começo da alça de repetição. 
Somamos 1 ao valor anterior armazenado 
em N (isto é, incrementamos ou acumula- 
mos o valor da contadora N). 


Agui imprimimos o valor atualizado de 
N, que será maior cada vez que a alça for 
repetida. 


Este é o fim da alça de repetição. Testa- 
mos se o valor incrementado na variável 
N já atingiu 10. Se ainda não tiver atingi- 
do, volta-se para a linha 20, para nova re- 


petição. 


Se o teste IF da linha anterior não for 
verdadeiro, ou seja, se N for igual ou 
maior do que 10, então o programa sai da 
alça e encerra o processamento, impri- 
mindo FIM. | 
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Portanto, vemos que este progra- 
ma tem três partes: 


= inicialização 
IO LET N=0 (antes da alça) 


aqui, tudo 
é repetido 
IO vezes 


50 PRINT “FIM” final da alça 
” 
e 





$ 
se quisermos, poderemos acrescentar 
outros comandos, fora da alça. 


Note que este programa poderia ser 
escrito de muitas outras maneiras, 
com exatamente o mesmo resultado, 
em termos de processamento: 


A) IO LET N=Q0 
20 IF N>I0 THEN 60 
30 LETN=N+1 
40 PRINT N;* ”; 
50 GOTO 20 
60 PRINT “FIM” 


B) ID LET N=1 
20 PRINT N;" ": 
30 LETN=N+1 
40 IF N< = 10 THEN 20 
50 PRINT “FIM” 


OC) IM LETN=1 
20 IF N>10 THEN 50 
30 PRINT N;“ ": 
35 LET N=N+1 
40 GOTO 20 
50 PRINT “FIM” 


Na variante À, o teste é feito antes do 
incremento. À variável contadora é igua- 
lada a zero na inicialização, por isso, a 
impressão (PRINT) tem que ser feita de- 
pois do incremento (N=N+ 1). 


Na variante B, a contadora é igualada 
a 1. Por isso, primeiro devemos imprimir 
seu conteúdo para somente depois in- 
crementá-lo. Neste exemplo, o teste é fei- 
to no final da alça. 


Na variante C, temos uma misturade À 
e B: o teste é feito no início da alça, mas 
a contadora é igualada a 1 também no 
início. 


Como essas, você poderia imaginar 
ainda um grande número de combina- 
ções das linhas, obtendo o mesmo resul- 
tado. Por isso, quase nunca existe uma 
única solução para um programa: várias 
soluções podem levar ao mesmo resul- 
tado. 


Mas cuidado: um pequeno erro no 
operador relacional, ou na ordem de co- 
locação das linhas, pode levar a um re- 
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sultado diferente do esperado. Por 
exemplo: 


10 PRINT N=Q0 

20 IF N > 10 THEN GOTO 60 
30 PRINT N; ” ” 

40 LETN=N+] 

0 GOTO 20 

60 PRINT “FIM” 


imprimirá 10 números, conforme o pre- 
visto, porém o fará de 0a 9. Experimente! 


Que linha você mudaria para obter 
um resultado correto? 


Modificando ligeiramente a lógica do 
programa acima, podemos fazê-lo con- 
tar de 2em 2, de3em 3 etc. 


Por exemplo, queremos fazer com que 
o programa imprima todos os números 
pares de 2 a 10: 


10 LETN=Q 

20 LET N=N+2 

30 PRINT N;” ”: 

40 IF N< 10 THEN GOTO 20 
50 PRINT “FIM” 


Na tela, será apresentado o seguinte 
resultado: 





Para obter os números ímpares de 1 a 9, 
bastariam estas mudanças: 


10 LET N=1 

20 PRINT N;* ”: 

30 LETN=N+2 

40 IF N<9 THEN GOTO 20 
50 PRINT “FIM” 


Obteríamos o seguinte resultado: 





Portanto, podemos ver claramente que 
todo programa de repetição controlada 
de alças (isto é, através de um certo nú- 
mero fixo de repetições), tem sempre os 
mesmos elementos básicos: 





variável contadora ou índice 





valor inicial 


* * “ 
r “ 


do índice 
20 PRINT N;* ": 
valor do 
30 LET N=N+(2) incremento 
do índice 





À repetição (da linha 20 à 40) se dá en- 
tre os valores inicial e final fixados no pro- 
grama para a variável contadora, ou 
índice. 

No programa acima, as linhas 10, 30e 40 
servem exclusivamente para montar a ló- 
gica de repetição: 


linha 10 - inicialização da contadora 

linha 30 - incremento da contadora 

linha 40 - testa se o conteúdo da conta- 
dora atingiu o valor final. 


Portanto, na realidade, apenas a linha 
20 é o “miolo” da alça. 


Podemos colocar quantos comandos 
quisermos entre os comandos de início e 
fim de uma alça. Neste caso, todos serão 
repetidos tantas vezes quantas determi- 
nar à contagem. 


Por exemplo, vamos fazer um progra- 
ma para imprimir na tela o quadrado e o 
cubo dos múltiplos de 2 (2, 4, 6, Betc.), 
até 20. 


10 LET N=2 

20 IF N> 20 THEN 80 
30 LET Q=N*N 

40 LET C=Nº*N*N 
50 PRINTN, Q, C 

60 LET N=N+2 

70 GOTO 20 

80 STOP 


Observe que neste exemplo as linhas 
de 30 a 50 constituem os comandos a se- 
rem repetidos pela alça. As linhas 10, 20, 
60 e 70 são usadas para incrementar e 
testar esta alça. 


E 
Iças variáveis 





Outra possibilidade muito interessan- 
te é substituir as constantes correspon- 
dentes aos valores inicial, final e de incre- 
mento de uma alça por variáveis numé- 
ricas. Isto permite que, com uín único 
programa, possamos fazer uma infinida- 


de de repetições diferentes. 


Por exemplo, vamos fazer um progra- 
ma que saiba contar de 1 até o número 
que quisermos (que será fornecido pelo 


teclado): 


60 CLS 

70 PRINT “EIS A TABUADA DE “;T 
80 PRINT 

90 LETN=T 

100 PRINT N;º *; N*T 
1O0LETN=N+T 

120 IF N<T*10 THEN GOTO 100 
130 STOP 


Um exemplo de execução deste pro- 


grama seria o seguinte: 





60 PRINT “EU SEI CONTAR DE 1 ATE O NUMERO” 
70 PRINT "QUE VOCE QUISER" 


80 PRINT | 


90 PRINT "DIGITE O NUMERO QUE QUISER = 


100 INPUT NUM 
110 PRINT NUM 
120 PRINT 

130 REM 


140 REM --- INICIALIZACÃO DA CONTADORA 


150 REM 
160 LET CONT=0 
170 REM 


180 REM --- ALCA DE REPETICAO 


190 REM 


200 LET CONT=CONT+1 


210 PRINT CONT 


220 IF CONT< NUM THEN GOTO 200 


230 STOP 


Da mesma forma, o incremento tam- 
bém poderia ser colocado como variável. 
Por exemplo, este programa mostra na 
tela a tabuada de multiplicar que 


quisermos. 
10 REM --- TABUADA DE 
MULTIPLICAR 
20 REM ---------=..-.... nn 
30 REM 
40 PRINT “QUE TABUADA 
VOCÊ QUER ESTUDAR?” 


50 INPUT T 





Os valores de incício, fime incremento 


da alça não precisam ser inteiros ou cres- 
centes, como nos exemplos até agora. 


Se o valor do incremento for negativo 
(neste caso, o nome apropriado seria de 
cremento), a contagem será retroativa, 
ou seja, o valor final deverá ser menor do 
que o inicial. 


Por exemplo, vamos fazer um progra- 
ma que faça uma contagem retroativa 
para simular o lançamento de um 
foguete! 





O programa pode ser bem simples: 


10 REM --- PROGRAMA PARA CON 
TAG EM REGRESSIVA 

20 REM ==... -mmmaamenoo 

30 REM 

40 PRINT VAMOS LANCAR UM FO- 
GUETE DA" 

0 PRINT “BARREIRA DO INFER 
NO... 

60 PRINT 

70 PRINT “QUANTOS SEGUNDOS 
FALTAM?” 

80 INPUT SEG 

90 REM 

100 REM 

SIVA 

110 REM 

120 CLS 

130 PRINT “ATENCAO” 

140 PRINT 

150 PRINT SEG; ": 

160 LET SEG=SEG —] 

170 IF SEG> O THEN 150 

180 PRINT 

190 PRINT 

200 PRINT FOGO...” 

210 STOP 


CONTAGEM REGRES- 


Observe que neste programa a variá- 
vel contadora (SEG) é inicializada pelo 
próprio comando INPUT, na linha 80. 


Com o programa seguinte, você pode 
ver também que os valores da alça não 
precisam ser inteiros (ou seja, podem ser 
fracionários): 


10 PRINT VALOR INICIAL DO INDI- 
Es “ 

20 INPUTI 

30 PRINT “VALOR DO INCREMENTO 
DO INDICE ?” 

40 INPUT S 

50 PRINT “VALOR FINAL DO INDI- 
Cd 
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60 INPUT F 

70 LET N=1 

80 PRINT Nº *; 

90 LETN=N+S 

100 IF NF THEN GOTO 80 
110 PRINT 

120 STOP 


Por exemplo, se colocarmos os valores 
[=4, S=0.5e F=6, teremos resultado: 





em um jeito 
mais fácil 








Como a programação de alças de re- 
petição é um recurso muito utilizado, a 
linguagem BASIC foi dotada de um co- 
mando que permite fazê-la de modo 
mais fácil do que usando o comando IF. 


Este comando é chamado de FOR 
que, em inglês, significa PARA. 


Para construir uma alça de repetição 
com o comando FOR, é necessário mar- 
car também o final da mesma por meio 
de segundo comando, chamado NEXT 
(SEGUINTE, em português), e que sem- 
pre é usado em conjunto com o FOR. 


Siga o exemplo abaixo, para com- 
preender de que jeito os comandos 
FOR... NEXT são utilizados para obter 


uma repetição. 


USANDO IF 


10 LET N=1 

20 PRINTN 

“30 LETN=N+1 

40 IF N <10 THEN GOTO 20 
50 PRINT "FIM" 


O comando na linha 10 do programa 
à direita está dizendo para o 
computador: 


10 repita PARA a variável N, indo de 1 
ATÉ 10, de lem1. 


Todos os comandos que estiverem en- 
tre a linha 10€e 0 próximo NEXT serão re- 
petidos tantas vezes quantas o número 
indicar (no exemplo, apenas a linha 20). 


O comando na linha 30 está dizendo 
para o computador: 


30 PRÓXIMA repetição com a variável 
N. 


O que significa que o programa retor- 
na à linha 20 (ou a qualquer linha que es- 
tiver imediatamente em seguida à linha 
com o comando FOR), para nova repeti- 
ção, desde que valor da contadora não 
tenha atingido o seu final. 


Portanto, o comando FOR serve para 
fixar: 


l. o nome da variável de contagem 
(índice) 

2. o valor inicial do dida 

3. o valor final do índice 

4. onde deve começar a alça de repetição 


Enquanto o comando NEXT serve pa- 
ra realizar o seguinte: 


1. incrementar o valor do índice 
2. testar se ele atingiu o valor final 
3. indicar o final da alça 


Depois da alça FOR...NEXT ter sido 
repetida n vezes, O programa retoma o 
seu fluxo normal, a partir da linha ime- 
diatamente após a linha que contém o 


NEXT. 





USANDO FOR... NEXT 
10 FOR N=1 TO 10 
20 PRINTN 

“30 NEXTN 


“50 PRINT “FIM 


Atenção: na linguagem BASIC para 
microcomputadores compatíveis com a 
lógica Sinclair (marcas TK 82C, TK 83, 
TK 85, CP 200etc.), éobrigatória a colo- 
cação do nome da variável-índice no co- 
mando NEXT. Em outros computadores, 
nem sempre isto é necessário. 


Você deve ter notado que o comando 
FOR, como foi mostrado até agora, não 
especificou o valor do incremento (quan- 
tidade a ser adicionada ao índice, a partir 


do valor inicial). 


Se nada for especificado no comando 
FOR, o valor do incremento é igual a 1. 


Se quisermos colocar um incremento 
diferente de 1, usamos o comando STEP 
(que significa PASSO), ao final do co- 
mando FOR: 


10 FOR 1=2 TO 10 STEP 2 
20 PRINT 1º *; 

30 NEXT I 

4W PRINT “FIM” 


Este programa vai mostrar todos os nú- 
meros pares de 2 a 10. O incremento ne- 
cessário (no caso, 2) é indicado pela pa- 
lavra STEP. 

Portanto: 

FOR N=1 TO 10 STEÉP1 


é a mesma coisa que 


FOR N=1 TO 10 


Portanto, se compararmos as duas for- 
mas de programar uma alça, poderemos 
facilmente identificar os seus elementos 
básicos: 


ay PRINT "FIM" 


Os comandos que estão entre um FOR 
eseu NEXT correspondente são agrupa- 
dos no chamado alcance da alça. Um 
outro nome que você poderá encontrar 
para alça, em outros livros e revistas, é 
malha. 


Ão contrário das alças construídas 
“com o comando IF, as alças com o co- 
mando FOR...NEXT admitem apenas 
uma estruturação. 


Note como o programa para elabora- 
da tabela de quadrados e de cubos 


muito mais simples: 


10 FOR N=2 TO 20 STEP 2 
20 LET Q=N*N 

30 LETC=N*N*N 

40 PRINT NQC 

50 NEXT N 

60 STOP 


Várias linhas de programação e uma 
ia são evitadas. 


As linhas 20, 30 e 40 são o alcance da 
alça, que vai de 20 a 50. 


Note também que o comando FOR 
aceita também especificações fracioná- 
rias ou negativas 

Por exemplo, o nosso programinha de 


contagem regressiva para os foguetes fi- 
caria assim: 


IO REM --- PROGRAMA PARA 
CONTAGEM REGRESSIVA 

20 REM =... 

30 REM 


49 PRINT “VAMOS LANCAR UM 
FOGUETE DA" 
50 PRINT "BARREIRA DO INFER- 
NO...” 
60 PRINT 
70 PRINT "QUANTOS SEGUNDOS 
FALTAM?” 
80 INPUT SEG 
9 REM 
100 REM --- CONTAGEM 
REGRESSIVA 
110 REM 
120 CLS 
130 PRINT “ATENCAO” 
140 PRINT 
150 FOR 5= dad LER] 
160 PRINT 5;" 
170 NEXT S 
: 180 PRINT 
- 190 PRINT 
+ 210 STOP 


Vale a pena anotar algumas diferenças 
importantes entre este programa e o que 
mostramos anteriormente, usando o co- 
mando IF: 


(mad 


. avariável SEG (valor inicial da conta- 
gem regressiva) não pode ser usada 
também como variável de índice ou 
contadora. Por isso usamos o valor S; 


2. o valor inicial (SEG) é menor do que o 
final (1); 


3. apesar do incremento ser 1, em valor 
absoluto, como é negativo, precisa ser 
especificado pelo comando STEP; 


4. todas as especificações do comando 
FOR podem ser constantes ou variá- 
veis, ou ainda expressões aritméticas 
válidas, indistintamente. 


Veja este exemplo: 


10 PRINT “QUE TABUADA VOCE 
QUER VER?” 

20 INPUT T 

30 PRINT “A PARTIR DE QUE VA- 
LOR?” 

AOINPUTI 

50 PRINT “ATÉ QUE VALOR?” 

60 INPUT F 

70 CLS 

80 PRINT “EIS A TABUADA DOS “:T 

90 PRINT 

100 FOR N=ITOF STEPT 

110 PRINT N? "; 

120 NEXT N 

130 STOP 


Alguns errinhos que você deve evitar, 
quando for usar os comandos FOR... 


1. na linha com o comando FOR, não po- 
dem ser omitidos o sinal de igualdade 
(=), o valor inicial (constante, variável 
ou expressão), a palavra TO, o valor fi- 
nal (constante, variável ou expressão), 
nesta ordem; 


2. a palavra STEP é opcional, mas, se co- 
locada, deve ser obrigatoriamente se- 
guida do valor do mesmo (também 
uma constante, variável ou expressão 


válidas em BASIC); 


3. não pode existir um comando FOR 
sem o NEXT correspondente nem um 
NEXT sem FOR; 


4. é obrigatório colocar o nome da variá- 
vel de índice no comando NEXT: 


5. o comando FOR deve ser encontrado 
pelo programa antes do comando 
NEXT que lhe corresponder. 


Verifique, na tabela de mensagens de 
erros (página 33), quais são os códigos 
que ocorrem quando cada uma das re- 
gras acima for desrespeitada na 
programação. 


esperando 
o tempo passar... 








Uma das utilidades das alças de repe- 
tição é fazer o tempo passar. Em outras 
palavras, se quisermos fazer com que o 
computador aguarde um certo período 
de tempo, entre uma fase e outra de um 

programa, podemos recorrer a uma alça 
FOX NEXT com um grande número de 
repetições, mas sem nenhum comando 
de entrada ou saída a seu alcance. Quan- 
to maior for o número de repetições, 
maior será o tempo obtido. 


Por exemplo: 


10 PRINT "COMPUTADOR"; 
20 FOR I=1 TO 500 

30 NEXTI 

40 GOTO 10 


Este programa escreve a palavra 
COMPUTADOR várias vezes, uma após 


a outra, até encher toda a tela. 


Entretanto, a “alça vazia” (isto é, que 
não contém nenhum comando) das li- 
nhas 20 e 30 cria um aumento de tempo 
que, no TK 85e em outros microcompu- 
tadores do mesmo tipo, corresponde a 
cerca de 2 segundos entre uma palavra 
e outra. 


Outro exemplo, para fazer uma pala- 
vra piscar na tela: 


10 PRINT “COMPUTADOR” 
20 FOR [=1 TO 100 


60 FOR 1=1 TO 100 
70 NEXTI 
80 GOTO 10 


Neste programa, a linha 10 escreve.a 
palavra COMPUTADOR naprimeira li- 
nha da tela. Em seguida, há um peque- 
no aumento de tempo, dado pela alça 
nas linhas 20 e 30, que faz com que esta 
palavra permaneça na tela por um certo 
tempo. Depois, a linha 40 apaga toda a 
tela. As linhas 60 e 70 criam um novo au- 
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mento de tempo, que a mantém apaga- 
da por igual período, e a linha 80 realiza 
a repetição do processo. 


Muitos computadores, como é o caso 
dos pg cond com a lógica Sinclair, 
têm um comando especial para obter au- 
mentos de tempo, ou pausas, como são 
tecnicamente chamadas. 


Este comando é denominado PAUSE. 
Procure-o no teclado de seu compu- 
tador. 


O programa acima poderia ser escri- 
to de forma muito mais simples, usando- 


se o comando PAUSE: 


10 PRINT “COMPUTADOR” 
20 PAUSE 20 

30 CLS 

40 PAUSE 20 

50 GOTO 10 


Quando o computador encontra o co- 
mando PAUSE, ele interrompe todo o 
processamento e continua a mostrar tu- 
do o que foi escrito na tela durante n qua- 
dros (n é o número, maior que zero e me- 
nor que 32767, que indica ao computa- 
dor quantos quadros ele deve esperar). 
Normalmente, a tela é renovada, em um 
aparelho de TV, à velocidade de 60 telas 
ou quadros por segundo. Isto nos dá a 
impressão de que ela é fixa, mas na rea- 
lidade ele- está piscando tão depressa, 
que nem percebemos. 


Ássim, no programa acima, o número 
20, depois do comando PAUSE, faz o 
computador esperar cerca de 20/60 de 


segundo, ou 1/3 de segundo, para depois . 


prosseguir. 


Quais as vantagens ou desvantagens 
da alça FOR NEXT em relação ao co- 
mando PAUSE? 


Bem, em primeiro lugar, a pausa da- 
da por FOR NEXT funciona para qual- 
quer computador, em qualquer “dialeto 
(variação) da linguagem BASIC. Por is- 
so, se você quiser fazer um programa que 
possa ser colocado em vários tipos de 
computador, use FOR... NEXT. 


Em segundo lugar, o comando PAU- 
SE tem uma peculiaridade: nos compu- 
tadorestipo TK, a cada 60 quadros (apro- 
ximadamente 1 segundo), a tela de vídeo 
pisca perceptivelmente, produzindo 
uma imagem pouco estável. Este efeito 


artificial não ocorre com o FOR... NEXT. 


Por outro lado, uma vantagem nitida, 


que o PAUSE tem sobre o FOR... NEXT, 
é que utiliza um número menor de linhas 
do que este (portanto, o programa gasta 
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menos memória, é mais curto e mais fá- 
cil de ser entendido). 


Vamos ver mais algumas aplicações 
interessantes para o PAUSE. 


No programa de contagem regressiva 
anterior, podemos tornar mais real a si- 
mulação de uma contagem se fizermos 
assim: 


10 REM --- PROGRAMA PARA CON- 
TAGEM REGRESSIVA 

GR ses meso eesaosooniene 

30 REM 

40 PRINT “VAMOS LANCAR UM 
FOGUETE DA 

50 PRINT “BARREIRA DO INFER- 

60 PRINT 

70 PRINT “QUANTOS SEGUNDOS 
FALTAM?” 

80 INPUT SEG 

90 REM 

100 REM --- CONTAGEM 

REGRESSIVA 

110 REM 

120 FOR S=SEG TO 1 STEP-1 

130 PRINTS; 

135 PAUSE 60 

140 NEXT S 

150 PRINT 

160 PRINT 

170 PRINT “FOGO...” 


O comando PAUSE funciona até que 
alguma tecla seja pressionada. Se isto 
acontecer, e se o comando PAUSE esti- 
ver em execução (tempo de espera), o 
computador executa imediatamente a li- 
nha seguinte ao comando PAUSE. Evi- 
dentemente, isto não acontece com a 
programação de alças de espera de tem- 
po com os comandos FOR... NEXT. O 
computador fica “congelado, não res- 
pondendo a nenhuma tecla (com exce- 
ção da tecla BREAK), durante todo o pe- 
ríodo de espera. 

O comando PAUSE pode ser usado 
também para apresentar várias telas de 
informação, dando tempo para que o 
usuário as leia, para, depois, limpar a tela 
com o comando CLS e para apresentar 
em seguida nova tela... 


IGPRINT JOGO DE ADIVINHACÃO 


30 PRINT 

40 PRINT “NESTE JOGO, EU VOU 

— SORTEAR UM' 

50 PRINT “NUMERO ENTRE 1 E 100, E 
VOCÊ” 

60 PRINT “TEM QUE TENTAR ADIVI- 
NHAR QUAL' 

70 PRINT “FOI” 

80 PAUSE 300 

90CLS 

100 PRINT “GANHA QUEM ADIVI- 

NHAR EM MENOR” 


110PRINT “NUMERO DE VEZES" 


“120 PAUSE 180 


130 PRINT 


Neste programa, as linhas de 10 a 70 
mostram a informação a ser lida na tela 
do vídeo. Em seguida, a linha 80 provo- 
ca uma pausa de cerca de 5 segundos (o 
que proporciona tempo para a leitura, 
mesmo para as pessoas que lêem deva- 
gar!), limpa a tela e passa para a segun- 
da tela de informação (linhas 100e 110), 
dá nova pausa (menor), na linha 120, e 
assim por diante. 


Se a pessoa lê com rapidez, basta que 
ela pressione qualquer tecla ao terminar 
a leitura. Se o comando PAUSE corres- 
pondente ainda estiver sendo executado, 
ele é interrompido epassa imediatamen- 
te para a linha seguinte. 





b. IOLET D=0 
20 LET I= 0.25 
30LET D=D+I 


40IF S 10THEN STOP 
50 PRINT S 
60 GOTO 30 


5. Qual é a sequência de valores que se- 
rão gerados pelos seguintes coman- 
dos FOR? 

FOR E=20 TO 100STEP 10 
FOR X=10TO 20 STEP 0.5 

FOR Z=5 TO 1 STEP - 0.25 
FOR N=34 TO 36 

FOR N=36 TO 34 

f. FORN=36 TO34 STEP -1 


a. 
b. 
Ê. 
d. 
e. 
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7. Faça um programa para testar se o 
resultado da divisão de um número 
por outro tem resto maior do que 
zero. 


Resposta: 


À função INT obtém o maior inteiro 
presente em um número qualquer. 


6. Descubra e explique quais os erros 
nos programas seguintes: 


- 121 FOR X=1 TO 232 STEP 3 
122 PRINT X/3 
123 NEXT Y 


Resposta: 


- IOFOR X$=1 TO 25 
20NEXT X$ 


Resposta: 


- 300FOR ZZ2=1 45 
310NEXT ZZ 


Resposta: 


- IW FOR I=—12 TO 12 STEP 2 
20 PRINT I, 
30 NEXT 


Resposta: 
- MNEXT] 
20 FOR]=2 TOS 


Resposta: 


RESPOSTAS AOS 
EXERCÍCIOS 
ANTERIORES 


Quando o resto de uma divisão é zero, 
então o resultado da divisão é igual ao 
seu inteiro. 


10INPUT N1 
20 INPUT N2 
30 LET D=N1/N2 


60 PRINT "NÃO DEIXOU RESTO” 
70GOTO 10 


7. Quantos segundos esperará cada co- 
mando PAUSE? 


- PAUSE 30 

- PAUSE 600 

- PAUSE 10/60 
- PAUSEI 


. Faça um programa para aceitar um 
nome qualquer pelo teclado e então 
fazê-lo piscar por 10 vezes seguidas, 
no meio da primeira linha da tela. 
Use comandos IF. 


. Faça um programa para calcular a 
soma de 10 números quaisquer, di- 
eg no teclado. Use o comando 


10. Faça um programa para imprimir 
uma tabela das raízes quadradas dos 
números de 10 a 1000, de 10 em 10. 
Use o comando FOR. 


10. Faça um programa que imprima na 
tela os números de 10 a 20. 


Resposta: 


IO LET N=10 

20 PRINT N 

30 LET N=N+1 

401F N< 20 THEN GOTO 20 
SOSTOP | 


“ 








ed 
Iças dentro 
de alças 


Muitas vezes é necessário repetir den- 
tro de um programa alças menores den- 
tro de alças maiores. Embora pareça 
complicada, esta operação é fácil de ser 
feita em BASIC, desde que tomemos al- 
guns cuidados. 





Para servir de exemplo, vamos fazer o 
seguinte programa: 


Queremos colocar na tela a lista dos 
números da cartela da Loto, de modo 
que cada dezena comece em uma linha 
nova. Dessa forma, temos: 





e assim por diante. 


Uma maneira bem fácil de programar 
isto é a seguinte: 


10 REM --- TABELA PARA APOSTAR 
NA LOTO 


30 REM 

40 FOR D=0TO 9 
S0FOR N=0TO 9 
60PRINT D'IG+N;" "; 
70NEXT N 

80 PRINT 

90 NEXT D 

100 STOP 


Podemos ver facilmente que este pro- 
grama tem duas alças, uma dentro da 
outra: 


SGFOR N=0TO9 
60 PRINT D'IG+N; * 


O primeiro FOR encontrado (linha 40) 
determina a repetição, por 10 vezes, de 
tudo que se encontra entre a linha se- 
guinte (linha 50) e o NEXT correspon- 
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dente (linha 90), ou seja, as linhas 50, 60, 
70 e 80. 


Entretanto, dentro dessa alça, encon- 
tramos um segundo FOR, que determi- 
na a repetição, por 10 vezes, detudo que 
se encontra entre a linha seguinte (linha 
60) e o NEXT correspondente (que está 
na linha 70). 


Portanto, a linha 60: 
60 PRINT D'IG+N;" *: 


que é a única que se encontra dentro das 
duas alças, simultaneamente, será 
executada: 


10x 10= 100 vezes 


Como existe um ponto e vírgula no fi- 
nal dessa linha, os números impressos 
sob controle da alça interna (linhas 50 e 
70) serão colocados sucessivamente na 
mesma linha, um após o outro, com um 
espaço em branco de separação entre 
cada dois algarismos. 


A linha 80 (que só é executada depois 
que a alça se completa) foi colocada para 
provocar uma mudança de linha no final, 
ou seja, para começar uma nova dezena 
na linha imediatamente abaixo. 


Para compreendermos como duas al- 
ças podem ficar “aninhadas” isto é, uma 
dentro da outra, costuma-se usar o recur- 
so das flechinhas de retorno: 


40 FOR D=0TO 9 
S0FOR N=0TO9 

60 PRINT D*I0+N; * 
ZO0NEXT 

80 PRI 

90 NEXT D 


Ão ser executado o programa pela pri- 
meira vez, acontece o seguinte: 


1. ao encontrar a linha 40, o programa 
inicializa a variável contadora D com 
o valor inicial 0, e especifica 9 como o 
valor final (máximo) e | como o incre- 


mento (STEP); 


2. ao encontrar a linha 50, o novo co- 
mando FOR inicializa a variável con- 
tadora N como o valor inicial de 0 e es- 
pecifica o valor final como9, eo incre- 
mento como 1; 


3. a linha 60 é impressa pela primeira 
vez. Como D é zero e N também é ze- 
ro, ainda teremos como resultado da 
expressão D*10+ No valor zero, que é 
impresso; 


4. agora o programa encontra a linha 70 
(NEXT N), que provoca o incremento 
da variável N de mais 1, e em seguida 
este valor é comparado com o valor fi- 
nal do índice, que é 9. Como ainda é 
menor do que este, a linha 60 (dentro 
da alça interna) é repetida mais uma 
vez. 

Mas agora o valor armazenado na 
variável N passou a ser 1, enquanto 
que o valor armazenado em D ainda é 
O. Portanto, calcula-se: 


D*10+N é igual a 0*10+1, 


ou seja, igual a 1, que é impresso na 
mesma linha que o valor O impresso 
anteriormente, por causa do ponto e 
vírgula; 


5. novamente o programa encontra a li- 
nha NEXT N, incrementa (N passa a 
ser 2, testa, etc.). Depois de repetir is- 
to até que 9 seja atingido, teremos uma 
linha impressa assim: 





6. portanto, ao terminar a alça que vai de 


50 a 70, o programa executa a linha se- 
guinte, que é 80 (PRINT), mudando 
de linha na tela, e cai na linha 90, que 
éum NEXT D, ou seja, que incremen- 
ta o valor armazenado na contadora D, 
testa se é menor que 9, etc. Como não 
é iguala 9 ainda, o programa repete 
a linha logo abaixo do FOR D, ou se- 
ja, a linha 50. Como esta é uma linha 
FOR, também repete-se tudo de no- 
vo, como acima, só que o valor de D é 
agora igual a 1. Portanto a linha a ser 
impressa passa a ser: 





e assim por diante. 


Vamos ver como ficariam, em uma ta- 
bela, os valores de N e D em cada repe- 
tição das duas alças: 


LINHA DN DON 
40 1) 1) (/) 
50 1) 1) 1) 
50 1) l l 
50 1) 2 2 
50 1) a 3 
50 () 4 4 
50 () 3 5 
50 1) 6 6 
50 1) 7 7 
o.) 0 8 8 
0.1) 1) 9 9 
40 l () 10 
50 l l 1 
50 1 2 12 
50 ] 3 13 

etc. 


Pela tabela, você pode observar que os 
dois índices (D e N) das alças variam re- 
gularmente (são incrementados). Só que 
o índice da alça mais interna varia mais 
depressa, e o índice da alça mais exter- 
na, mais devagar. 


Podemos colocar várias alças, umas 
dentro das outras. 


À única regra que devemos seguir à 
risca é a seguinte: não pode haver “cru- 
zamentos” entre os FOR e respectivos 
NEXT das alças emparelhadas. Por 
exemplo, o seguinte programa provocará 
uma mensagem de erro: 


100 FOR 1=1 TO 3 
IOFORJ=1 TO 2 
120 PRINTI,J 
I30NEXTI 
I40NEXT] 


Se colocarmos as flechinhas que indi- 
cam os pares FOR... NEXT, veremos que 
há um cruzamento entre elas, o que indi- 
ca o erro sintático: 


100 FOR [=1 TO 3 
1O0FORJ=1 TO2 
120 PRINTI) 

I30 NEXTI 
I40NEXT]J 


Outro arranjo não permitido é usar a 
mesma variável-índice para duas ou mais 
alças que estejam aninhadas. Embora is- 
to, muitas vezes, não seja indicado pelo 
computador comó um erro sintático, na- 
turalmente pode provocar erros lógicos 
muito difíceis de serem detectados. 


100 FOR 1=1 TO 
LOFOR I=1 TO 
120 NEXTI 
I30 NEXTI 


É 
4 


Da mesma forma, devemos evitar a 
modificação da variável-índice da alça 
dentro da mesma (por exemplo, através 
do comando LET ou do comando IN- 
PUT), de modo a evitar erros lógicos. En- 
tretanto, isto é permitido pelo interpreta- 
dor BASIC. Por exemplo: 


IGFOR 1=1 TO 10 
20 LET I=1+1 
30PRINTI 
40NEXTI 


Coloque este programa no computa- 


dor e verifique qual é o resultado. 


m programa 
completo 








Agora você já conhece um número su- 
ficiente de comandos em BASIC para 
tentar seus primeiros programas comple- 
tos. Para exemplificar os passos de de- 
senvolvimento de um programa de maior 
porte, vamos programar iuntos a seguin- 


te tarefa: 


Faça um programa para calcular a 
média simples das matérias para ca- 
da um dos alunos de uma classe. Ão 
final, o programa deve mostrar a mé- 
dia geral da classe. Além disso, o 
programa deve informar para cada 
aluno as suas notas, a sua média, e se 
foi aprovado (nota igual ou maior que 
7, se ficou para recuperação (nota 
maior que 5 e menor que 7) ou se foi 
reprovado (nota menor que 5). Tanto 
o número de alunos quanto o número 
de matérias são variáveis (isto é, são 
diferentes para cada série, e devem 


ser informados ao programa). 


Solução: 


Vamos dividir o nosso trabalho de 


programação nas seguintes etapas: 


a. especificação dos dados de en- 


trada 


b. especificação dos dados de saí- 


da 


c. especificação das constantes in- 


ternas 


d. especificação das fórmulas de 
cálculo 

e. esquema geral do programa 
(etapas) 

f. Respiração em linguagem BA- 

g. teste com alguns dados conheci- 
dos 

h. documentação 


a. Especificação dos 
dados de entrada 


Parâmetros de operação do pro- 
grama: 


CLS$ - nome da classe (por exem- 
plo, 52 série À 

NA - número de alunos na classe 

NM - número de matérias que a 
classe tem 


Dados individuais (para cada alu- 
no) 


NOS - nome 

NU - número da classe 

NO - nota em uma determinada 
matéria 


b. Especificação dos 
dados de saída 


MG - média global da classe 
MA - média geral de cada aluno 


c. Especificação das 
constantes internas 


AP - nota de aprovação (>= 7) 

RR - nota de recuperação (>=5 
e <7) 

RP - nota de reprovação (<=5) 


d. Especificação das 
fórmulas de cálculo 


5 - soma das notas de cada 
aluno 
MA = S/ND - média geral do alu- 
no 


e. Esquema geral 
do programa 


O programa terá as seguintes par- 
tes: 


1. identificação do programa 

2. instruções breves de utilização 

3. entrada de dados paramétricos 
(nome da classe, número de 
alunos e de matérias) 

4. alça de entrada dos alunos: en- 
trada do número de classe e 
nome 


. alça de entrada das notas de 
cada aluno 

cálculo da média do aluno 
acumulação da soma das mé- 
dias da classe 

impressão dos resultados de 
um aluno 

. Cálculo e impressão da média 


global 
10. fim do programa 


o No q 


f. Codificação em 
linguagem BASIC 


10 REM ----------------- 

20 REM - MEDIAS 1.00 JAN 85 

30 REM - CALCULO DE MEDIAS DE UMA 
40 REM - CLASSE P/ SINCLAIR 

50 REM - (C) 1985 R. SABBATINI 


70 REM 

80 REM --- 1. IDENTIFICACAÃO ---- 

90 REM 

100 PRINT TAB 12; “MEDIA 1.00 * 

110 PRINT “CALCULO DAS MEDIDAS DA CLASSE" 

120 PRINT 

130 PRINT 

140 REM 

150 REM --- 2. OBJETIVO ---- 

160 REM 

170 PRINT “ESTE PROGRAMA TEM POR OBJETIVO” . 

180 PRINT “CALCULAR AS MEDIAS GERAIS 
DOS ALUNOS” 

190 PRINT “DE UMA CLASSE, A PARTIR DAS” 

200 PRINT “SUAS NOTAS NAS DISCIPLINAS.” 

210 PRINT 

220 PRINT “FORNECA OS SEGUINTES DADOS” 

230 PRINT “PARA A CLASSE:” 

240 PRINT 

250 REM 

260 REM --- 3. DADOS PARAMETRICOS ---- 

270 REM 

280 PRINT “NOME DA CLASSE?” 

290 INPUT CLS 

300 PRINT “NUMERO DE ALUNOS NA CLASSE?” 

310 INPUT NA 

320 NA = INT (NA) 

330 IF NA < 1 THEN GOTO 310 

340 PRINT “NUMERO DE DISCIPLINAS?” 

350 INPUT NM 

360 NM = INT (NM) 

370 IF NM < 1 THEN GOTO 350 


9 LETMG - 0 


"380 REM 
" 390 REM --- 4. ENTRADA DOS ALUNOS 
- 490 REM 

* 495FOR ALUNO = 1 TO NA 

* 410 CLS 


“420 PRINT “CLASSE : "; CIS ;” - 
- 430 PRINT “ALUNO NO.”; E COMO 

| MMQPRINT"' ================" 
450 PRINT 

460 PRINT “DIGITE OS DADOS DESTE ALUNO:” 


- 470 PRINT 


480 PRINT “NOME?” 

490 INPUT NOS 

500 PRINT “NUMERO DA CLASSE?” 

- 510 INPUT NU 

520 PRINT 

530 REM | 

540 REM --- 5. ENTRADA DAS NOTAS --- 
550 REM 

560 LET S = O 

570 FOR NOTA = 1 TO NM 

580 PRINT “NOTA DA MATERIA” ; NOTA 
590 INPUT NO 

600 IF NO< O THEN 590 

610 IF NO > 10 THEN 590 

620 LETS = S + NO 


630 NEXT NOTA 
635 LET MA = 5/NM 
640 PRINT 


650 PRINT “MEDIA GERAL = "; MA 
660 LET MG = MG + MA 


670 NEXT ALUNO 

680 REM 

690 REM ---- 6. CALCULO MEDIA GLOBAL --- 
700 REM 

710 CLS 


720 PRINT “MEDIA DA CLASSE” ; MG/NA 
730 STOP 
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TESTE 


9.1.Quando é necessário usar variáveis dentro de um programa para arma- 
zenar o resultado de expressões? 


Resposta: 








9.2. Indique o que está errado nas linhas abaixo: 
a. 25 LET NOME$=25 
b. 30 LET VARI$="12AB 
o AS ET Co COMP TA  r 
d. 50 LET C$=25+4"22 pn ii 
e. 60 LET LOG(N) = 423 O 
f. 70 PRINT X=225 
g. 80 LET “COMPUTADOR” = C$ 














9.3. Identifique, na coluna à direita, qual é o tipo de constante ou variável 
em BASIC, marcando a letra correspondente na coluna à esquerda: 


a. variável alfanumérica ( ) 123.14 
b. variável numérica ( ) “ATOMO” 
c. constante alfanumérica E amido 
d. constante alfanumérica Ea 
e. comando BASIC ( )LEI 
( ) ABCS 
( o Êo cá 
( ) “PRINT 123” 
( ) RUN IM 


9.4. Como faz o computador para armazenar na memória um nome compos- 
- to de vários caracteres? 


Resposta: 





9.5. Defina: 
a. caractere: 
b. cadeia de caracteres: 
c. variável alfanumérica: 
d. variável numérica: 


e. constante alfanumérica: 





f. constante alfanumérica: 





9.6. Qual é o comprimento máximo de uma cadeia de caracteres permitido 
pelo BASIC? 


Resposta: 





9.7. Descreva as diferenças básicas de funcionamento entre os comandos 
LET e INPUT. O que têm eles em comum? 


Resposta: 


9.8. Mostre como aparecerá a linha de baixo da tela, quando o programa 
encontrar os seguintes comandos (dica: cursor K ou L, com ou sem as- 


pas): 


50 INPUT NS 


e - 


50 INPUTS 





9.9. Como se deve proceder para interromper a execução do programa, ca- 
so ele esteja parado nas linhas acima? 


Resposta: 


9.10.Cite três usos para o comando REM em um programa. 
Resposta: 1. 
A 
À 


9.11. O que é um comando executável? Dê três exemplos. 
Resposta: 1. 
di 
3. 


9.12. Identifique na coluna à esquerda cada comando em BASIC, com a 
função que ele realiza na coluna à direita: 


a. RUN ( ) armazena algo em uma variável 

b. NEW ( ) linha de comentário 

c. STOP ( ) inicia a repetição de uma alça 

d. PRINT ( ) executa um programa 

e. LET ( ) continua um programa interrompido 
f. REM ( ) mostra um resultado na tela 

g. INPUT ( ) testa uma condição 

h. PAUSE ( ) limpa a tela 

i. GOTO ( ) continua a repetição de uma alça 

j. CLS ( ) interrompe a execução do programa 
l. FOR ( ) apaga um programa da memória 

m. NEXT ( ) entra um valor pelo teclado 

n. LIST ( ) desvia o programa para outra linha 
o. CONT ( ) lista um programa na tela 

p. EDIT ) corrige uma linha de programa 


q. IF ) provoca uma pausa no programa 
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9.13. 


9.14. 


9.15. 


9.16. 


9.17. 


9.18. 


9.19. 


9.20. 


Defina: 

a. variável somadora: 
b. variável contadora: 
c. alça de repetição: 
d. cláusula lógica: 


e. operador relacional: 


tm 


. alça sem fim: 

g. aninhamento de alças: 

Identifique os elementos básicos de uma alça: 

FORI=1 TO 12 SIEP 2 

O que o programa abaixo vai mostrar na tela ao ser executado? 
10 FOR I=1 TO 100 STEP 10 

20 FOR ]J=I TO 1+2 

30 PRINT J; 


40 NEXT J 
50 NEXT 1 


Resposta: 


O que acontecerá ser for adicionada a seguinte linha ao programa 
acima? 


45 PRINT 


Faça uma programa para gerar na tela todas as combinações possíveis 
de preenchimento do cartão da Loteria Esportiva. Por exemplo: 


1 - COLUNA 1 3 - COLUNA 1 
2 - COLUNA 1 COLUNA 3 
COLUNA 2 


Dica: numere as colunas 1, 2 (do meio) e 3. 


Cite duas regras importantes que não podem ser violadas no aninha- 
mento de alças. 





Resposta: 





Cite duas vantagens do comando FOR para construir alças, em relação 
ao comando IF. 


Resposta: 








Modifique o programa para o cálculo das médias de uma classe (pá- 
ginas 54 e 55), de modo a permitir colocar as notas-limites para apro- 
vação, recuperação e reprovação, por meio de comandos INPUT 
(variáveis). 


Faça um programa para apresentar na tela três exercícios de tabua- 
da de multiplicar e testar se o resultado apresentado pelo aluno foi 
correto. O programa deve dizer, ao final, quantos exercícios foram 
resolvidos corretamente pelo aluno. 





CA P Í 


Ea. ORTE E AZAR NO 


ql COMPUTADOR 





Para muitas pessoas, O jogo é uma 
das coisas mais interessantes e diver- 
tidas que se pode fazer com um com- 
putador. Se o jogo incluir efeitos de 
acaso, sorte ou azar, melhor ainda! 


Este capítulo será quase todo dedi- 
cado aos jogos e aos modos de 
programá-los. Vamos começar com 
um joguinho bem simples, de adivi- 
nhação, depois estudar como fazer 
um programa útil ao ensino e, final- 
mente, vamos programar alguns jo- 
guinhos que utilizam gráficos na tela. 


Para introduzir o acaso (sorteio de 
um dado, por exemplo) em um jogo, 
é necessário conhecer uma função 
própria da linguagem BASIC que 
permite sortear números. 


Esta função é chamada de RND, 
abreviatura da palavra inglesa RAN- 
DOM, ou seja, aleatório (ao acaso). 


À função RND, portanto, serve pa- 
ra sortear números aleatórios. 


Números aleatórios são números 
escolhidos ao acaso pelo computa- 
dor, a partir de certo conjunto maior 
de números. 


Vamos imaginar, por exemplo, co- 
mo é o sorteio de um número em um 


dado. 


Ão lançarmos o dado, a face que 
ficar para cima será o número sortea- 


do. 
E 
Naturalmente só temos seis alterna- 
tivas possíveis no lançamento do da- 
do. À este conjunto de números cha- 
mamos de espaço amostral. O núme- 


ro aleatório só poderá ser um destes 
seis. 


Outro exemplo seria uma moeda, 
no jogo de cara ou coroa. Só temos 
aqui duas alternativas. Vamos excluir 
a possibilidade de a moeda ficar de 


T UU LO 


pé sobre a borda! O espaço amostral 
da moeda é igual a 2. O espaço 
amostral do dado é igual a 6. 


A probabilidade de que um deter- 
minado número aleatório saia em um 
sorteio é definida como o inverso do 
número das alternativas possíveis. 


Assim, por exemplo, a probabili- 
dade de sair no dado um determina- 
do número é de: 


1] um evento em 


6 seis alternativas possíveis 


Expressando em percentagens, ha- 
veria a probalidade de sair um núme- 
ro qualquer como sendo: 


100 x 1] = 
6 


16,6660% 


Em outras palavras, se jogarmos 
um dado 100 vezes, cada uma das fa- 
ces será sorteada cerca de 16 vezes 
aproximadamente. Para calcular, 
portanto, quantas-vezes se espera um 
determinado resultado, multiplica- 
mos a probabilidade pelo número de 
vezes em que ser realizará o sorteio. 


Quantas vezes, por exemplo, se es- 
pera que saia coroa, se lançarmos 
uma moeda 200 vezes? 


1/2 x 200 = 0,5 x 200 = 100 vezes 


1/2 é a probabilidade de que coroa 
seja sorteada um um lançamento. 


Note que a probabilidade de sair 
cara é a mesma de sair coroa, ou se- 
ja, 50%. Tanto neste caso, como no 
caso de um dado, dizemos então que 
a distribuição probabilística e UNI- 
FORME, ou seja, todos os números 
possíveis têm a mesma probabilidade 
de ser sorteados. 









q A função END 


Como podemos utilizar esta função 
do BASIC para simular o sorteio de 
números aleatórios uniformes? 


Você se lembra de que uma função 
em BASIC efetua sempre um cálculo 
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ou devolve um resultado, à partir de 
um dado ou argumento que dermos à 
ela dentro do programa. 


Para calcularmos, por exemplo, a 
raiz quadrada do número 25, fazemos 
assim: 

LEI R = SOR (25) 
sendo 25 o dado ou argumento. A 
função SOR, quando chamada, re- 
torna o resultado (no caso, 5), que é 
armazenado na variável indicada por 


LET. 


Podemos também colocar a função 
dentro de uma expressão: 


LET RAIZ = 100 * SOR (25)/3 


ou ainda, dentro de um comando 


PRINT: 
PRINT SOR (25) 


À função RND é um pouco diferen- 
te. Ela não precisa de um argumento. 
Bastaria colocar, por exemplo, 


PRINT RND 


para sortear um número aleatório ou 
usar RND dentro de uma expressão 


LEI. 


Em segundo lugar, a função RND 
não faz nenhum cálculo matemático, 
como no caso da raiz quadrada 
(SQR) e outras funções em BASIC 
deste tipo. 


Ela apenas retorna um número 
aleatório de distribuição uniforme, 
compreendido entre zero (0) e um 


(1). 


Cada vez que a função RND é usa- 
da, um nmero aleatório inteiramente 
diferente é sorteado. 


Por isso, a função RND é chamada 
de geradora de números aleatórios. 


O conceito de número aleatório, 
no caso da função RND é parecido 
com o do sorteio de dados e moedas, 
só que o número sorteado não é um 
número inteiro (1, 2, 3 etc.). mas um 
número fracionário, entre 0 e 1. 


Se colacarmos, por exemplo, no 
computador o seguinte programa: 


10 FOR I=1 TO 10 


2 


20 PRINT RND 
30 NEXT 1 


sortearemos em seguida IÚ números 
aleatórios, que serão impressos na te- 
la assim: 


0.03892129 
0.12455412 
0.67129093 
0.001 12232 
0.48983312 
0.87811121 
0.11201232 
0.00989823 
0.01909123 
0.53219883 


Se você executar novamente o pro- 
grama, um novo conjunto de 10 nú- 
meros totalmente diferente do pri- 
meiro será mostrado na tela. Um nú- 
mero deste tipo nunca se repete. 


Na realidade, o nosso “sorteador” 
não é tão perfeito assim. O número 1 
“redondo” (1.000000000) nunca é 
sorteado. Os limites do sorteio caem 
então entre 0.000000000 (zero perfei- 
to) e 0.999999999. 


sando RND 
em jogos 





O gerador de números aleatórios 
do BASIC é do tipo universal, ou se- 
ja, ele pode ser usado para simular 
qualquer tipo de sorteio (dados, moe- 
das, baralhos etc.). Vamos ver como 
isto é feito. 


Comecemos com o caso mais sim- 
ples: a moeda. 


Cada evento probabilístico (em ou- 
tras palavras, o que pode resultar do 
lançamento honesto de uma moeda) 
tem a probabilidade de 0,5. 


Portanto, para simular o lançamen- 
to de uma moeda com a função RND, 
podemos fazer simplesmente isto: 


1. sorteamos um número fracioná- 
rio de O a 1 com a função RND; 


2. testamos se este número é me- 
nor do que 0,5. Se for, consideramos 
que saiu cara, por exemplo. Se for 
maior do que 0,5, consideramos que 
saiu coroa (podia ser o contrário, pois 
esta é uma convenção que depende 
apenas do programador). 


60 


Vejamos um programa que realiza 
isto: 


10 LET R=RND 
20 IF R<0.5 THEN PRINT 
“CARA” 


30 IF R>=0.5 THEN PRINT. 


“COROA” 
40 GOTO 10 


Vamos interpretar o que faz este 
programa: 


- linha 10 = sorteie um número fra- 
cionário entre O e 1 e armazene-o na 
variável R; 


- linha 20 = se R for menor do que 
0.5, imprima a palavra CARA; 


- linha 30 = se R for maior ou igual a 
0.5, imprima a palavra COROA; 


- linha 40 = volte para a linha 10 (no- 
vo sorteio). 


Se executarmos este programa, 
poderemos ter o seguinte resultado: 


CARA 
COROA 
CARA 
CARA 
CARA 
COROA 
CARA 
COROA 
COROA 


e assim por diante, até encher total- 
mente a tela. Observe que, neste sor- 
teio, saíram apenas três coroas e cin- 
co caras. Mas não havíamos dito que 
o número de caras e coroas seria 
igual? | 


Bem, isto só vai acontecer se sor- 
tearmos um número muito grande de 
vezes! Quanto mais sortearmos, mais 
semelhante será a ocorrência dos 
dois eventos. Esta é a chamada lei 
dos grandes números. 


Como a função RND tornou possí- 
vel um sorteio “honesto” da moeda? 


Você se lembra de que nós disse- 
mos que a distribuição aleatória do 
gerador RND é uniforme, não é? 


Isto significa simplesmente que ca- 
da um dos números à serem sorteados 
tem a mesma probabilidade. Em con- 
sequência, se dividirmos este conjun- 
to de números em duas partes (menor 
e maior do que 0,5 respectivamente), 
a probabilidade de sair um número 
que caia numa destas duas metades 
continua sendo igual, certo? 


Como dividimos o espaço amostral 
em apenas duas possibilidades, será 
de 0,5 a probabilidade de cada uma 


delas! 


Podemos estender este raciocínio 
para outras divisões: em 3, 4, 3, 10 
possibilidades etc. 


Mas há um inconveniente: teremos 
que aumentar o número de IF no pro 
grama, para poder testar todas as 
possibilidades. 


Existe, felizmente, um meio mais 
fácil de fazer isto. Usaremos um arti- 
fício matemático muito simples e fácil 
de entender, que serve para qual 
quer ocasião. 


Vamos agora tomar como exemplo 


o dado. 


O dado tem um espaço amostral de 
6: existem apenas seis possibilidades 
de sorteio. 


Se multiplicarmos o resultado da 
função RND por 6, teremos o seguin- 
te: 


menor número que pode ser 
sorteado por RND =0 
multiplicado por 6 =6x0=0 


maior número que pode ser 
sorteado por RND =0. 
multiplicado por 6 = 5.999999994 


Teremos, portanto, um número fra 
cionário, que pode ser desde O até 
5.999999994 


Como queremos um número intei- 
ro distribuído entre 1 e 6, basta usar: 
mos a seguinte expressão em BASIC: 


INT (RND*6) + 1 


Vamos analisar o que esta expres: 
são faz com o número sorteado: 


- primeiro, ela multiplica o número 
aleatório por 6, dando, portanto, um 
número aleatório entre O e 


5.999999994; 


- em seguida, calcula o inteiro deste 
número (ou seja, o dígito à esquerda 
do ponto) e obterá um número de 0 à 


' 


- finalmente, soma 1 a este número. 
Portanto, teremos um número de la 


6. 


Conseguimos programar um sor- 
teador de dados! 


Vamos tomar um exemplo com al- 
guns números aleatórios, para enten- 
der como funcionam estas transfor- 
mações: 


RND * 6 
0.0000000 
0.0152052 
2.070741 
5,9999994 





Para ver um maior número de 
exemplos, coloque no computador o 
programa abaixo: 


10 LET R=RND 

20 PRINT R; R*6; INT (R*6); INT 
(RND*6)+1 

30 GOTO 10 


Agora podemos programar o nosso 
primeiro joguinho, para sortear um 
dado quantas vezes quisermos: 


10 REM --- JOGO DE SORTEIO DE 
UM DADO 

20 REM --- PARA MICROS TIPO ZX 

E ndo 1 A 

40 REM 

50 PRINT “SORTEIO DE UM DADO” 

60 PRINT 

70 PRINT “QUANTAS VEZES QUER 
LANCAR O DADO?”; 

80 INPUT NV 

99 PRINT NV 

100 PRINT 

HO FOR I=1 TO NV 

120 PRINT “SORTEIO NO."; 1; ="; 
INT (RND*6)+1 

130 NEXT 1 

140 STOP 


Um exemplo de jogada seria o se- 


guinte: 





INT (RND * 6) INT (RND*6) + 1 
0 l 
0 l 
2 3 
5 6 


em 
EE 





aleatório mesmo? 








Teoricamente, um bom gerador de 
números aleatórios nunca deveria re- 
petir a mesma sequência de números 
sorteados. Entretanto, isto é impossi- 
vel de se conseguir na prática, devi- 
do à maneira como eles são progra- 
mados na memória ROM do compu- 
tador. 


Explicando de maneira simplifica-. 


da, um gerador interno de números 
aleatórios funciona da seguinte ma- 
neira: 


Um número aleatório, ao ser gera- 
do pela função RND, fica armazena- 
do internamente em uma memória de 
trabalho. Uma segunda vez que a 
função RND for chamada, ela trans- 
forma este número armazenado por 
um processo matemático especial, 
para gerar um outro número aleató- 
rio. Este processo se repete tantas ve- 
zes quantas a função RND for chama- 
da. 


Por isso, dizemos que o gerador 
aleatório precisa de uma “semente” 
para funcionar. O número gerado em 
cada chamada serve de semente para 
o próximo. À sequência então é 
pseudo-aleatória, e depois de alguns 
milhões de sorteios pode se repetir 
novamente. 


O mais grave, entretanto, é que, 
quando ligamos o computador pela 
primeira, vez, o gerador aleatório 
sempre usa uma “semente” fixa, que 


é 0.0022735596. 


Isto significa que o joguinho que 
você programar poderá estar "“vicia- 
do”, desde que se saiba qual é a se- 
quência inicial. 


Para evitar isto, o BASIC tem um 
comando chamado RAND, que pode 
ser usado logo no começo do progra- 
ma, para gerar uma “semente” ao 
acaso, ou seja, a primeira semente da 
série de sorteios. 


Para todos so efeitos, precisamos 
dar um comando RAND ao computa- 
dor apenas uma vez antes de cada sé- 
rie de sorteios. 


Por exemplo: 


5 RAND 
10 PRINT INT (RND*2)+ 1; 
20 GOTO 10 


vai sortear números 1 e 2 ao acaso. À 
linha 5, com o comando RAND, será 
uma sementinha aleatória inicial, de 
modo que ninguém conseguirá advi- 
nhar a seguência de sorteios. 


Note bem: não confunda o coman- 


do RAND com a função RND. 


EXERCE 
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3. Indique qual o número aleatório 
podem 





mínimo e máximo que sair, 
em função das expressões abaixo: 
Mínimo Máximo 
a. INT (RND) o 
bl iii e a 
o tom o gr 4) A A 
d. RND/2 A nine 
e. RND*RND pd 
4. Teste no computador qual será o 
resultado dos seguintes programas: 
a. 10 PRINT RND (0) 
20 GOTO 10 


b. 10 PRINT 1 
20 GOTO TO 


). Faça um programa para sortear as 
cartas de um baralho, mostrando o 
seu valor ou figura na tela. 


Dica: as cartas de um baralho são: 
2, 3; 4, 9, 6, 4, 8, 9, 10, J; Q, K e A, 
em quatro naipes (espadas, copas, 
paus e ouros). 


Faça dois sorteios no programa: 
um para sortear a figura. outro para 
sortear o naipe. Depois apresente o 
resultado assim: 


A CARTA SORTEADA 
FOI 5 DE COPAS. 


A CARTA SORTEADA 
FOI VALETE DE PAUS. 


e assim por diante. 


ogos interativos 


Um jogo que só pode sortear coisas 
não é muito interessante, pois logo a 
gente se cansa. Além disso, é mais 
divertido usar uma moeda, um dado 
ou um baralho de verdade! 





À grande vantagem que o compu- 
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6. Faça um programa para imprimir 
20 sorteios de um número aleatório R, 
calculando é imprimindo em cada 
sorteio as seguintes transformações 
do programa: 


a. R*10 
b. 1+INT (R*10) 
c. 10 +INT (R*10) 


7. O que fazem os programas abaixo? 
a. 10 FOR I=1 TO INT (RND*200) 
20 NEXT I | 


30 CLS 
40 PRINT I 


8. Escreva as expressões com a fun- 
ção RAND, necessárias para sortear 
números aleatórios que simulem os 
seguintes jogos: 


a. roleta (números 0a 35) . 
b. palitinho (0 a Spalitos) 
c. loto (números 0 a E 


9. Faça um programa que sorteie 10 
vezes um número aleatório inteiro, 
compreendido entre um mínimo de 
50 e um máximo de 100 (inclusive). 


10. Qual é o número esperado de ve- 
zes que: 


a. sairá o número 6 em um dado 
lançado 300 vezes? 


b. sairá o ás em 20 cartas retiradas 
de 20 baralhos? 


? 


* tador oferece na programação de jo- 
gos é sua interação com a pessoa. Po- 
demos fazer com que o computador 
jogue com uma pessoa para ver quem 


ganha. 


Programar um jogo deste tipo é fá- 


cil. Basta usar os comandos: 


RND  - para sortear alguma coisa 
INPUT - para pegar respostas (ou jo- 
gadas) do usuário. 

IF - para testar se é igual ou di- 


ferente do sorteado 


Vamos começar com um jogo bem 
simples: o tradicional cara ou coroa. ' 


OBJETIVO DO JOGO 
"CARA OU COROA" Nº 1: 


O computador pergunta à pessoa 0 
que irá aparecer: cara ou coroa. Em 
seguida, sorteia a moeda e mostra se 
a pessoa acertou. Se ela errou, quem 
ganha é o computador. Se ela acer- 
tou, o computador perde. 


l0 REM --- JOGO DE CARA OU 
COROA Nº 1 

20 REM -------.........nnnno non... 

30 REM 

40 RAND 

50 PRINT “CARA OU COROA” 

60 PRINT'“==============" 

70 PRINT 

80 PRINT “ESCOLHA O QUE VO. 
CE QUER:” 


90 PRINT 

100 PRINT “1 =CARA 2=COROA" 

110 PRINT 

120 aro “DIGITE UM NUMERO 1 
Ed 

130 INPUT JOGO 

140 IF JOGO < 1 THEN GOTO 120 

150 IF JOGO > 2 THEN GOTO 120 


160 REM 
SORTEIO DA MOEDA 


170 REM --- 

180 REM 

190 LET FACE=1 + INT (RND*2) 

200 PRINT 

210 IF FACE = 1 THEN PRINT "SAIU 
CARA” 

220 IF FACE =2 THEN PRINT “SAIU 
COROA” 


230 REM 

240 REM --- 
NHOU 

250 REM 

260 PRINT 

270 IF JOGO = FACE THEN 300 

280 PRINT “EU GANHEI” 

290 GOTO 310 

300 PRINT “VOCE GANHOU” 

310 STOP 


VERIFICA QUEM GA- 


Para jogar outra partida, digite 
RUN novamente ou então modifique 
o programa, substituindo a linha 310 


por 
310 GOTO 70 


Vamos: fazer agora um jogo um 
pouco mais sofisticado: 


OBJETIVO DO JOGO 
"CARA OU COROA” Nº 2: 


O computador pergunta à pessoa o 
que irá aparecer: cara ou coroa. Em 
seguida, sorteia a moeda e mostra se 


a pessoa acertou. Os sorteios são re- 
petidos n vezes. Ganha quem acertar 
maior número de vezes. 


Não precisa apagar da memória do 
computador o jogo anterior. Basta 
modificar ou inserir as linhas que são 
diferentes na listagem abaixo: 


REM --- JOGO DE CARA OU 
COROA Nº 2 

REM -------..... nenem 
REM 

RAND 

LET NCOMP=0 

LET NJOG=0 

PRINT “CARA OU COROA” 


PRINT “QUANTAS VEZES 

QUER JOGAR ?” 

INPUT NV 

FOR N=1 TO NV 

PRINT 

PRINT JOGADA Nº”; N 

PRINT “ESCOLHA O QUE VO- 

CE QUER :” 

9% PRINT 

100 PRINT “1 = 
ROA" 

110 PRINT | 

120 PRINT “DIGITE UM NÚMERO | 

U 2 


e 
Ss 


Ses 8aEssB 


8 3s8? 


CARA 2 = CO 


130 INPUT JOGO 

149 IFJOGO < | THEN GOTO 120 
150 IFJOGO > 2 THEN GOTO 120 
160 REM 
170 REM --- SORTEIO DA MOEDA 
180 REM 

199 LET FACE=1 + INT (RND * 2) 
200 PRINT 

210 IF FACE = 1 THEN PRINT “SAIU 


E 

220 IF FACE = 2 THEN PRINT “SAIU 
COROA” 

230 REM 

240 REM --- VERIFICA QUEM GA- 
NHOU 

250 REM 

260 PRINT 

210 IF JOGO = FACE THEN 300 

280 PRINT “EU GANHEI 

285 LET NCOMP = NCOMP+ 1 

2H GOTO 310 

300 PRINT “VOCÊ GANHOU” 

305 LET NJOG=NIJOG+I1 

310 NEXT N 

320 REM 

330 REM --- VERIFICA NUMERO FI- 
NAL DE PONTOS 


340 REM 

350 PRINT “EU ACERTEI: 
NCOMP;” VEZES” 

360 PRINT “VOCE ACERTOU” 
'NJOG;” VEZES” 

370 PRINT 


3801F NJOG >NCOMP THEN 
PRINT “PARABENS, VOCÊ GA- 
NHOU” 


390 IF NJOG < NCOMP THEN 
PRINT “EU SOU O CAMPEÃO" 

400 IF NJOG=NCOMP THEN 
PRINT “EMPATE” 

410 STOP 


As diferenças entre este programa 


e o número 1 são as seguintes: 


- à variável NCOMP, zerada na linha 


42, servirá para contar o número de 


vitórias do computador; 


- a variável NJOG, zerada na linha 
44, servirá para contar o número de 
vitórias do jogador; 


- a variável NV indica o número de 
sorteios que serão realizados e que 
controla a alça que vai da linha 66 até 
a linha 310 


- nas linhas 285 e 306 são incrementa- 
das as contadoras NCOMP e NJOG, 
conforme o ganhador tenha sido o 
computador ou o jogador, respecti- 
vamente; 


- as linhas 320 a 40) servem para 
anunciar o resultado final. 


Com alguma imaginação você 


conseguirá aperfeiçoar este jogo até 
que ele se torne realmente emocio- 
nante. 





1. Faça um programa de cara ou co- 
roa semelhante ao anterior, usando, 
puta, um dado, ao invés de uma 


Dicas: Na linha 130 a pessoa deve 


entrar um número de 1 a 6. Modifi- 
que as linhas anteriores (para instru- 
ções) e a linha 150 (teste): 


- e a expressão da linha 


- modifique as linhas 210 e 220 que 
anuciam o resultado; 
- modifique as linhas de título. 


2. Faça um programa que sorteie 
dois dados, e mostre a soma dos nú- 
meros sorteados. Se a soma for igual 
a 7, pare de sortear. Se for diferente 
de 7 sorteie novamente. 


3. Faça um programa que sorteie as | 


cartas de um baralho completo, per- 
guntando antes ao jogador nai- 
pe ele acha que sairá sorteado. 


4. Explique por que o seguinte pro- 
grama pode ser usado para substituir 
o comando RAND, em computadores 


que não o possuem: 


“NÃO 


“QUE HORAS SAO 


10 PRINT 

30 FOR I=1 TO INT (H*10) 

40 LET R= RND 

50 NEXT 1 

vs Faça um p para simular o 


programa 
seguinte jogo E Porenadahe” %: o com- 
putador sorteia um dado várias ve- 
zes. O número de tos de cada 
lançamento é acumulado com os vero 
tos anteriores. Depois de 
cada lançamento, o programa per- 
gunta ao jogador se quer continuar 
ou desistir. Se o jogador desistir, fica 
com o número acumulado de pontos 
até aquele momento. Se continuar, 
entretanto, caso o computador sor- 


“teie o número 1, perde tudo o que já 
Ganha 


acumulou antes. 
mular mais pontos. . 
Dica: Use um acumulador cbsumndo 


quem acu- 


SOMA. No final de cada sorteio, poe 


gunte: 


QUER CONTINUAR 
“(SIM OU NAO)? 


o verifique se a resposta oi “SIM “ou 
4h 


» Rh 


“a 
luxogramas 





Nesta seção, vamos aprender uma 
nova maneira de planejar progra- 
mas. Você já deve ter notado que, 
quando o programa tem uma lógica 
muito complexa, ou seja, tem muitos 
desvios condicionais e incondicionais 
(IF, GOTO etc.) fica muito difícil vi- 
sualizar quais OS caminhos que o pro- 
grama deve seguir. 


O planejamento prévio do progra- 
ma, nestes casos, é uma atividade 
muito importante, porque auxilia O 
programador a desenvolver progra- 
mas: 


- mais facilmente escritos na lingua- 
gem BASIC; 

- mais livres de erros, ou seja, com 
pouco ou nenhum erro, quando 
testados pela primeira vez, 

- cujos erros são facilmente encon- 
trados, corrigidos etc.; 

- mais simples e compactos, ou seja, 
facilmente compreensíveis, efi- 
cientes e que ocupam um espaço 
menor de memória. 


Se digitamos um programa no 
computador, à medida que as idéias 
vêm à nossa cabeça, há uma grande 
probabilidade de que este programa 
fique confuso, com erros e de difícil 
compreensão. Embora muitas vezes 
ele faça corretamente O trabalho para 
o qual foi destinado, nem sempre O 
faz da forma mais eficiente. 


Tudo isto é especialmente mais evi- 
dente em relação aos programas com 
lógica mais complexa. 


Um modo eficaz de planejar pro- 
gramas deste tipo é O denominado 
 FLUXOGRAMA, também chamdo 
de DIAGRAMA DE BLOCO. 


O fluxograma é uma forma de re- 
presentar graficamente (por símbolos 
ou figuras) a estrutura e O fluxo de 
um programa. | 


Cada parte do programa (geral- 
mente cada linha) é representada por 
um símbolo especial, que correspon- 
de estreitamente ao tipo de comando 
ou instrução a ser usado. Estes simbo- 
los são denominados blocos. 


Por exemplo, o comando LET é re- 
presentado por uma “caixinha”, ou 
retângulo, que contém a expressão 
ou atribuição a ser realizada: 
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O comando IF é representado por 
um lozango que contém a condição: 


SIM 


NÃO 


O comando STOP é representado 
por esta figura: 


O comando INPUT é representado 
pelo perfil de um teclado que traz O 
nome da variável: 


E o comando PRINT é representa- 
do por uma tela de vídeo: 





Existem muitos outros símbolos que 
posteriormente conheceremos. 


Estes símbolos são dispostos no pa- 
pel em segúência, de cima para bai- 
xo, representando os sucessivos CO- 
mandos que comporão o programa. 
Para indicar o fluxo ou direção de um 
comando para outros, usam-se sinais 
em forma de seta. 


Muitos programas têm uma lógica 
linear. (Isto quer dizer que eles não 
têm bifurcações ou desvios através de 
IFs ou GOTOSs. E o caso do programa 
abaixo, que serve para converter 
graus Fahrenheit em Celsius (escalas 
de medida de temperatura): 





C=5/9*(F-32) 





Observe que todo fluxograma tem 
obrigatoriamente um INÍCIO e um 
FIM, marcados pelos simbolos cor- 
respondentes. Eles não precisam ser 
necessariamente representados na 
listagem, como abaixo: 


10 PRINT “GRAUS FAHRENHEIT? 

20 INPUT F 

30 LET C=5/9*(F-32) 

40 PRINT F; “GRAUS F="; Ci 
GRAUS C” 


Vamos ver agora um exemplo com- 
pleto de programação bem simples, 
para entender como é feito o fluxo- 
grama para programas com desvios. 


Vamos fazer um programa para 
testar se um determinado número di- 
gitado pelo usuário é negativo, posi- 
tivo ou zero (já estudamos este exem- 
plo no capítulo anterior, às páginas 


37 e 38). 


O fluxograma ficaria assim (veja os 
comentários à direita): 


Como vemos, é bastante fácil vi- 
sualizar todas as alternativas a cada 
teste. Cada teste tem apenas duas saí- 
das: verdadeira (SIM), que geral- 
mente é colocada à direita do símbo- 
lo do IF, ou falsa (NÃO), que é colo- 
cada logo abaixo. 


Para iniciar a codificação em BA- 
SIC, basta numerar os símbolos se- 
guencialmente, prestando atenção 
aos desvios. À numeração é colocada 
ão lado de cada símbolo: 





INICIO | 


b 


10 





“ENTRE UM NUMERO QUALQUER” 


30 
S 
" 70 
“NUMERO NEGATIVO” |— 
| 40 | 


“NUMERO POSITIVO” 





. 50 
“NUMERO ZERO” 


Cm 90 


Agora fica muito mais fácil escre- Observe que foi necessário usar 
ver o programa: apenas dois comandos IF para testar 


três condições. Os comandos GOTO 


IO PRINT “ENTRE UM NUMERO das linhas 60 e 80 têm sua necessida- 


QUALQUER” de deduzida a partir do exame do flu- 

20 INPUT N xograma, e não precisam ser especi- 
30 IF N<0 THEN GOTO 70 ficados nele (embora não seja proibi- 
40 IF N>Q0 THEN GOTO 90 do). 

50 PRINT “NUMERO ZERO” O símbolo do comando GOTO é 
60 GOTO 100 um círculó pequeno: 

70 PRINT "NUMERO NEGATIVO” + 

80 GOTO 100 

90 PRINT “NUMERO POSITIVO” 100 
190 STOP 
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Outros símbolos bastante usados 
para fluxogramas de programação: 


Impressão em impressora (parece 
uma folha de papel rasgada): 


"RESULTADOS = “:MEDIA 





O comando FOR é representado 
por esta figura: 





comando NEXT correspondente 
tem o mesmo símbolo do GOTO: 


Eles são ligados por uma linha in- 
terrompida: € 


1=1 TO 10. 





Se o desenho não cabe em uma 
única folha de papel, podemos usar o 
seguinte símbolo para indicar uma 
continuação ou mudança de página: 


Com o tempo, você terá oportuni- 
dade de usar todos estes símbolos. 


Uma boa idéia é adquirir uma ré- 
gua ou gabarito de Hluxogramas, em 
papelarias ou casas especializadas 
em materiais para desenho. Ela já 
tem os elementos vazados para os 
simbolos de programação 


De agora em diante, procure sem- 
pre desenhar um fluxograma para 
cada programa, antes de tentar 
escrevê-lo em BASIC. 


Isto vai aumentar muito a qualida- 
de e correção de seus programas. 


m jogo de 
adivinhação 








Você agora tem a possibilidade de 
programar uma variedade enorme de 
jogos de sorte ou azar. Alguns deles 
são bastante simples, mas muito di- 
vertidos, e chegam mesmo a ser edu- 
cativos. 


É o caso do jogo de adivinhação 
chamado Maior ou Menor?, que va- 
mos mostrar agora como programar, 
e que serve para ensinar estes con- 
ceitos às crianças. 


O funcionamento do jogo é o se- 
guinte: 


O computador informa à criança 
que está pensando em um número si- 
tuado entre 1 e 10. Em que número 
ela acha que ele está “pensando”? 

Se a resposta que a criança der 
não for correta, o programa informa 
se o número é muito baixo ou muito 
alto, e pergunta novamente. 

Quando a criança acertar, o pro- 
grama informa quantas tentativas fo- 
ram necessárias. 


Este jogo é educativo também em 
outro sentido. Existe uma estratégia 
para acertar em menor número de 
vezes possível. Podemos deixar a 
criança jogar e descobrir sozinha 
qual é esta estratégia; ou então 
ensiná-la depois de certo tempo e ver 
se ela a aplica corretamente. 


Depois veremos qual é esta estraté- 
gia! 


Planejando o jogo 


O programa terá as seguintes fa- 
ses: 


1. mostra na tela o título do jogo e as 
instruções iniciais; 

. sorteia um número aleatório entre 
le 0; 

. pergunta um número para o joga- 

or; 

. testa se este número é igual, me- 
nor ou maior do que o sorteado; 

. se for igual, o jogador acertou. In- 
forma quantas tentativas precisou 
para acertar; 

6. se for maior ou menor, informa 
através de uma mensagem, e volta 
para o passo 3. Incrementa o nú- 
mero de tentativas. 


QB GO 


As variáveis do programa poderão 
ser as seguintes: 


NS - número sorteado 
A - adivinhação do jogador 


NT - número de tentativas 


Gabarito para desenho 
de fluxogramas 
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JOGO gi ADIVINHACAO” 


“Inr=o E e NO 
| NS = 1+INT(RNDHO) | 


ETR DE ua : , 
; : ” ; Rot Do ARS KAT) : 
á rico e A ed 
ERR : 
, ) : EN RNA Es sura 





Codificação em BASIC 





10 PRINT JOGO DE ADIVINHA- JOGO DE ADIVINHACAO 
Ã st 

|D PRINDO === ===== EU VOU PENSAR EM UM NUMERO DE 1 A 10 
D=>32325====== GANHA QUEM ADIVINHAR EM MENOS TENTA- | 

20 PRINT TIVAS | 

25 PRINT “EU VOU PENSAR EM | 
UM NUMERO DE 1 A” EM QUE NUMERO ESTOU PENSANDO? 6. ER 

3% PRINT “10. GANHA QUEM ROU. TENTE UM NUMERO MENOR. EM QUE NU 
ADIVINHAR EM MENOS” MERO ESTOU PENSANDO? 3. ERROU. TENTE 

395 PRINT “TENTATIVAS.” UM NUMERO MAIOR. EM QUE NUMERO ESTOU | 

38 PRINT PENSANDO? | 

à LETNSOL + INT (RND*10) a IL | 

45 LETNS=1 + D* 

50 PRINT “EM QUE NUMERO ES- praga 
TOU PENSANDO?” 

60 INPUT À 

65 PRINT À 

7) IF NS<A THEN GOTO 110 

80 IF NS > À THEN GOTO 120 e 

ab RR ce EM NT; JOGO DE ADIVINHACAO 

100 STOP Rós 

10 PRINT “ERROU. TENTE UM EU VOU PENSAR EM UM NUMERO DE 1 A 10 
NUMERO MENOR” GANHA QUEM ADIVINHAR EM MENOS TENTA- | 

15 GOTO 130 TIVAS 

120 ij UM EM QUE NUMERO ESTOU PENSANDO? 6. ER 

130 LET NT=NT+1 | ROU. TENTE UM NUMERO MENOR. EM QUE NU 

— | MERO ESTOU PENSANDO? 3. ERROU. TENTE 
140 GOTO 50 | UM NUMERO MAIOR. EM QUE NUMERO ESTOU 


| PENSANDO? 4. ACERTOU EM 3 TENTATIVAS 





Exemplo de um jogo 


Coloque o programa no computa- 
dor e experimente várias vezes. 


| JOGO DE ADIVINHACAO Sugestões para modificar 
| o programa 
EU VOU PENSAR EM UM NUMERO DE 1 A 10. | 
GANHA QUEM ADIVINHAR EM MENOS TENTA |. Coloque os números mínimos e 
TIVAS máximos (no exemplo, 1 e 10) como 


variáveis dentro do programa, po- 
dendo ser especificadas pelos co- 
mandos INPUT, logo no início do 
programa. 


EM QUE NUMERO ESTOU PENSANDO? 


2. Faça o jogador colocar o seu nome 
no início do programa e depois po- 
nha este nome nas mensagens de er- 
ro e acerto. 


3. Coloque no lugar do comando 
STOP uma pergunta: 


JOGO DE ADIVINHACAO QUER JOGAR MAIS UMA VEZ 


(SIM OU NÃO)? 
EU VOU PENSAR EM UM NUMERO DE 1 A 10 
GANHA QUEM ADIVINHAR EM MENOS TENTA- | 4. Estenda o programa de modo a 
dec permitir a participação de dois joga- 


EM QUE NUMERO ESTOU PENSANDO? 6. ER dores, um competindo contra o outro 
ROU. TENTE UM NUMERO MENOR. EM QUE NU (ganha quem adivinhar em menor 
MERO ESTOU PENSANDO? número de tentativas). 
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5. Estenda o programa para adivi- 
nhação de letras do alfabeto (A, B, 
C, Detc.), ao invés de números. 





nsinando tabuada 
pelo computador 








Uma boa aplicação para a função 
RND é a criação de um grande núme- 
ro de problemas de matemática, com 
dados diferentes de cada vez. Esta é 
uma aplicação educativa do compu- 
tador, pois permite ao aluno fazer 
muitos exercícios. Além disso, cada 
aluno recebe um conjunto de exercí- 
cios totalmente diferente dos demais. 
Podemos também fazer o computador 
dar notas aos alunos, dependendo do 
número de problemas que ele acerta. 


Vamos agora desenvolver juntos 
um programa para apresentar dez 
problemas de tabuada de multiplica- 
ção, sendo um dos fatores de multi- 
plicação gerado ao acaso, entre 1 e 
10. Após a apresentação de cada 
problema, a resposta é colhida e 
comparada com a resposta certa. No 
final é atribuída uma nota ao aluno. 


Planejamento do programa 
As fases do programa serão: 


1. mostrar o título do programa e seu 
objetivo; 

2. perguntar ao aluno que tabuada 
ele quer estudar; 

3. sortear um número de 1 a 10; 

4. mostrar na tela o problema: ta- 
buada x número sorteado; 

5. entrar a resposta do aluno; 

6. testar se a resposta do aluno está 
correta; 

7.se estiver correta, dar os para- 
béns e incrementar o contador de 
número de respostas corretas; 

8. se estiver errada, mostrar o resul- 
tado correto; 

9. voltar para o passo 3, até que se 
esgotem os dez problemas; 

10. apresenta a nota final. 


Às variáveis poderão ser: 
T -tabuada que quer estudar 
NA - número de acertos 


F -fator de multiplicação sorteado 
R -resposta do aluno 
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Fluxograma 


INICIO 
| “TABUADA” io 
Instruções 
40 
“QUE TABUADA QUER 
ESTUDAR” 





F=1+INT (RND'10) | & 
ho E 
a 
Nr 
La 


“ERROU. O RESULTADO 
E “PT 


Pause | 18 


dy 170 
“SUA NOTA FOI” 18, 

NA 
Cm JE 






140 
ACERTOU 


NA=NA+1 | 130 


Codificação em BASIC 


10 PRINT “TABUADA” 

15 PRINTº=======º 

20 PRINT 

25 PRINT “VAMOS ESTUDAR TA- 
BUADA DE VEZES" 

3% PRINT “EU APRESENTO UMA 
CONTA PARA VOCÊ” 

35 PRINT “FAZER, E VOCÊ RES- 
PONDE, TA?” 

37 PRINT 

40 PRINT “QUE TABUADA QUER 
ESTUDAR?” 

50 INPUT T 

60 LET T=INT(I) 

70 IF T<2 THEN GOTO 40 

80 FORI=1 TO IO 

85 LET F=1 + INT (RND*10) 

9 CLS 

PRINT FA srs 

100 INPUT R 

105 PRINT R 

10 IF R=F*T THEN GOTO 140 

120 PRINT “ERROU. O RESULTA- 
DO E FI 

130 GOTO 160 

140 PRINT “ACERTOU” 

150 LET NÃ=NA+I1 

160 PAUSE 200 

170 NEXT I 

180 PRINT “SUA NOTA FOI “;NÃ 

190 STOP 


Coloque o programa no computa- 
dor e exercite com ele. 


Sugestões para modificar 
o programa 


|. Coloque o número de problemas 
(no exemplo, 10) como variável den- 
tro do programa, podendo ser espe- 
cificado pelo comando INPUT, logo 
no início do programa. 


2. Faça o aluno colocar o seu nome 
no início do programa, e depois po- 
nha este nome nas mensagens de er- 
ro e acerto. 


3. Coloque no lugar do comando 
STOP uma pergunta: 


QUER TENTAR MAIS UMA VEZ 
(SIM OU NÃO)? 


4. Estenda o programa de modo a fa- 
zer com que os dois fatores de multi- 
plicação variem aleatoriamente. 


5. No lugar de mensagem de acerto 
ou erro, coloque a figura gráfica de 
um palhacinho rindo ou chorando, 
respectivamente. 


RESPOSTAS AOS 
EXERCÍCIOS 
ANTERIORES 
Páginas 51/52 50 LET PROD = PROD*N 
60 NEXT I 
1. Faça um programa para calculara SO PRINT "FATORIAL DE N= 
soma dos números inteiros de 1 a 100. “PROD 


8. Faça um programa para aceitar 
um nome qualquer pelo teclado, e 
em seguida fazê-lo piscar dez vezes 
seguidas, no meio da primeira linha 


Resposta: 


Versão 1 (usando IF): 


10 LET SOMA =1 | da tela. 
20 LET N=1 
30 LET N=N+1 Resposta: 
e Ada - ao a , 10 PRINT "ENTRE UM NOME 
60 GOTO 30 7 ot bc ad | 
70 PRINT SOMA a LETN=0 
ã 40 

Versão 2 (usando FOR): 50 PRINT TAB (12):N$ 
10 LET SOMA =0 
20 FORN=1 TO 100 70 LETN=N+1 
30 LET SOMA=SOMA + N 80 IF N<10 THEN GOTO 40 
40 NEXT N 90 STOP 
50 PRINT SOMA 


9. Faça um programa para calcular a 
soma de dez números quaisquer, di- 


2. Modifique o programa acima, de aitados pelo teclado. 


modo a poder calcular a soma dos 
números inteiros de 1 a um número 


qualquer. Resposta: 
Resposta: 10 LET SOMA = 0 
20 FOR I=1 TO 10 
5 PRINT “ENTRE O NUMERO MA- 30 PRINT “ENTRE A PARCELA 
XIMO PARA A SERIE:” NO.“:1I, 
8 INPUT MX 40 INPUT P 
10 LET SOMA =0 45 PRINT P 
20 FOR N=1 TO MX 50 LET SOMA = SOMA +P 
30 LET SOMA = SOMA + N 60 NEXT I 
40 NEXT N | 70 PRINT SOMA 
50 PRINT SOMA 80 STOP 


3. Faça um programa como o acima, 10. Faça um programa para imprimir 
para calcular o fatorial de um núme- uma tabela das raízes quadradas dos 


ro inteiro qualquer (N!). números de 10 a 1000, de 10 em 10. 
Resposta: | Resposta: 
10 PRINT “QUE NUMERO QUER O 10 PRINT'"N”, “RAIZ QUADRADA” 
FATORIAL?” 20 FOR N= 10 TO 1000 STEP 10 
20 INPUT N 30 PRINT N,SQR(N) “ 
30 LET PROD=1 40 NEXT N 


40 FOR I=2 TO N 50 STOP 
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9.17. Faça um programa para ge- 
rar na tela todas as combinações pos- 
síveis de preenchimento do cartão da 
Loteria Esportiva. 


Solução: 


10 LET N=Q 

20 FOR I=1 TO 3 

30 FOR ]=I TO 3 

40 LETN=N+1 

50 PRINT N;” - ";” COLUNA “;I 
60 IF I=] THEN GOTO 80 

70 PRINT “ COLUNA “;J 

80 NEXT ] 

90 NEXTI 


Nota: Este programa gerará todas 
as combinações 1, 1-2, 1-3,2,2-3€e3, 
mas não gerará a marcação tripla, 1- 
2-3. 


9.20. Faça um programa para apre- 
sentar na tela três exercícios de ta- 
buada de multiplicar e para testar se 
o resultado apresentado pelo aluno 
foi correto. O programa deve dizer, 
no fim, quantos exercícios foram re- 
solvidos corretamente pelo aluno. 
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4 Faça um programa para simular 
várias vezes o sorteio de uma moeda. 


Resposta: 


PRINT "SORTEIO DE UMA 
MOEDA” 

RAND 

PRINT 

PRINT "QUANTAS VEZES?” 


INPUT N 

FOR I=1 TON 

IF RND> 0.5 THEN 90 
PRINT "CARA” 
GOTO 100 

PRINT "COROA” 

00 NEXT 1 


ts 
S 


S$Ss8S85888a 


ts 


RESPOSTAS AO 
TESTE 
ANTERIOR 


“Solução: 


PRINT “3 EXERCICIOS DE TA- 
BUADA” 
PRINT 
LET N=Q0 
PRINT “3 x 4?” 
INPUT R 
IF R<>12 THEN GOTO 90 
LET N=N+1: 
PRINT “ACERTOU” 
GOTO 100 
PRINT “ERROU” 
100 PRINT "8x 6?” 
120 INPUT R 
130 IF R<>48 THEN GOTO 170 
140 LET N=N+1 
150 PRINT “ACERTOU” 
160 GOTO 180 
170 PRINT “ERROU” 
180 PRINT “7 x 4º?” 
190 INPUT R 
200 IF R<>28 THEN GOTO 240 
210 LET N=N+1 
220 PRINT “ACERTOU” 
230 GOTO 250 
240 PRINT “ERROU” 
250 PRINT 
260 PRINT “VOCE ACERTOU 
“N;” PROBLEMAS” 
270 STOP 


RESPOSTAS AOS 
EXERCÍCIOS 
ANTERIORES 


2. Modifique o programa acima para 
contar quantas vezes saiu cara e 
quantas vezes saiu coroa, informando 
o resultado no fim. 


Resposta: 


10 PRINT “SORTEIO DE UMA 
MOEDA” 


RAND 


PRINT 

PRINT "QUANTAS VEZES?” 
INPUT N 

LET CA=0 

LET CO=0 

FOR I=1 TO N 

IF RND > 0.5 THEN 90 
PRINT “CARA” 

LET CA=CA+1 
GOTO 100 

PRINT “COROA” 


SSasSSÊNSSso 


Observação: Note como esta é uma 
maneira pouco eficiente de fazer um 
programa que apresenta programas 
repetitivamente. Um programa muito 
mais curto seria: 


10 PRINT "PROBLEMAS DE TA- 
BUADA” 


PRINT 
PRINT “QUE TABUADA?” 
INPUT T 


LET N=Q 
FOR I=1 TO 10 
CLS 
PRINT 1 od ? " 
100 INPUT R 
110 IF R<>I*T THEN GOTO 130 
120 LET N=N+1 
125 GOTO 140 
130 PRINT “ERRADO” 
140 NEXT I 
150 PRINT 
160 PRINT VOCÊ ACERTOU “;N;” 
PROBLEMAS 
170 STOP 


95 LET CO=CO+4+1 

100 NEXT I 

1190 CLS 

120 PRINT “SORTEIO DE UMA 
MOEDA “:N;” VEZES” 

130 PRINT 

140 PRINT “SAIRAM “:CA;” CA- 
RAS (";CA/N*100 ; %)” 

150 PRINT “SAIRAM” «CO: "o As 
ROAS (";CO/N "100: Y já | 

160 STOP 


5. Faça um programa para sortear as 


cartas de um baralho, mostrando o 
seu valor ou figura na tela. 


Resposta: 
10 REM --- SORTEIO DE UM BA- 
RALHO 
20 REM --- PARA MICROS TIPO 





* SINCLAIR ZX8] 
o REM —. JANEIRO 65 - Ro R. 


um mm 


$0 REM -.- TITULO E DADOS 


MO REM 
p 30 PRINT "JOGO DE SORTEIO 
| DECARTAS" . 





E PRINT 


Ee LET NC= INT (NC) 

140 IF NC <1 THEN GOTO 110 
150 REM 

160 REM --- ALCA DE SORTEIO 
DAS CARTAS 


20 2 REM - MOSTRA O RESULTA- 


230 REM 

240 ecrad “A CARTA SORTEADA 
250 IF C <11 THEN GOTO 310 
252 REM 

254 REM --- MOSTRA VALOR DA 
— CARTA 


256 REM 
260 IF C=11 THEN PRINT "VALE- 
TE; 


20 IF C=12 THEN PRINT 
"DAMA” 

280 IF C=13 THEN PRINT "REI"; 

290 IF C= 14 THEN PRINT "AS"; 

300 GOTO 330 

310 PRINT C; 

330 PRINT * DE ”; 

340 REM 

350 REM --- IMPRIME NAIPE 

360 REM 

oil - =1 THEN PRINT "ESPA- 

Ã “ 

380 IF N=2 THEN PRINT “COPAS” 

390 IF N=3 THEN PRINT "PAUS" 

400IF N=4 THEN PRINT 
“OUROS” 

410 NEXT 1 

420 STOP 


6. Faça um programa para imprimir 
20 sorteios de um número aleatório R, 
calculando e imprimindo em cada 
sorteio as seguintes transformações 
do programa: R * 10, 1 + INT(R*10), 


10 + INT(R*10) 
Resposta: 
10 RAND 


20 FOR I=1 TO 20 

30 LET R= RND 

40 PRINT R*10;1+INT(R*10); 
10 +INT(R*10) 

50 NEXT I 

60 STOP 
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2. Faça um programa que sorteie 
dois dados, e mostre a soma dos nú- 
meros sorteados. Se a soma for igual 


a 7, pare de sortear. Se for diferente 


de 7, sorteie novamente. 
Resposta: 
10 PRINT “O JOGO DOS 2 DA- 
DOS. 


20 PRINT 

30 RAND 

40 LET Dl = 1 + INT(RND*6) 
50 LET D2 = 1 + INT(RND*6) 
60 LET SOMA = DI + D2 

70 IF SOMA =7 THEN STOP 
80 GOTO 40 


3. Faça um programa que sorteie as 
cartas de um baralho completo, per- 
guntando antes ao jogador qual nai- 
pe ele acha que sairá sorteado. 


Resposta: 


Vamos aproveitar o programa do 
exercício 5, mostrado anteriormente. 


Au tinhas novas são: 182 HA ISA, 
402 e 404 


10 REM --- SORTEIO DE UM BA- 
RALHO 


20 REM --- PARA MICROS TIPO 
SINCLAIR ZX81 7 

30 REM --- JANEIRO 85 - (C) R. 
SABBATINI 


60 REM --- TITULO E DADOS 

70 REM 

80 PRINT “JOGO DE SORTEIO 
DE CARTAS” 


100 PRINT 

110 PRINT "QUANTAS CARTAS 
QUER SORTEAR?” 

120 INPUT NC 

130 LET NC=INT (NC) 

140 IF NC<1 THEN GOTO 110 


150 REM 

160 REM --- ALCA DE SORTEIO 
DAS CARTAS 

170 REM 


180 FOR 1I=1 TO NC 
182 PRINT "QUE NAIPE VAI DAR? 
183 PRINT "1 =ESPADAS, 2=CO0- 


PAS, 3=PAUS, 4= OUROS" 
184 INPUT A | 
190 LET C=2 + INT (RND * 1) 
200 LET N=1 + INT (RND * 4) 
210 REM 
220 e --- MOSTRA O RESULTA- 


230 REM 

240 ad “A CARTA SORTEADA 
250 IF C<11 THEN Goro 310 
252 REM 


254 REM --- MOSTRA VALOR DA 


CARTA | 
266 REM 
md 1 THEN PRINT “VALE. 


270 IF C=12 THEN PRINT 
“DAMA”: 

280 IF C=13 THEN PRINT “REI”; 

290 IF C = 14 THEN PRINT “AS”; 

300 GOTO 330 

310 PRINT C; 

330 PRINT “ DE "; 

340 | 


REM 
350 REM --- IMPRIME NAIPE 


360 REM 

370 IF N=1 THEN PRINT "ESPA 
380 IF N = 2 THEN PRINT “COPAS” 
390 IF N=3 THEN PRINT “PAUS” 

4001F N=4 THEN PRINT 
402 1F NA THEN PRINT “ACER- 
4041F N<>A THEN PRINT “ER- 

ROU” 


410 NEXT I 


5. Faça um programa para simular o 
seguinte jogo ("Porquinho"). Veja o 
enunciado completo. 


10 REM --- JOGO DO PORQUI- 


9 PRINT VAI ROLAR O 
DADO...” 

37 PRINT 

40 RAND 

50 LET SOMA =0 | 

60 LET D=1 + INT(RND*6) 

65 PRINT "SAIU O NUMERO “;D 

70 IF D=1 THEN GOTO 160 

80 LET SOMA =SOMA+D 

90 PRINT "VOCÊ AGORA TEM 
“"SOMA;” PONTOS.” 

100 PRINT 

110 PRINT “QUER CONTINUAR 
(SIM OU NÃO)?” 

120 INPUT R$ 

130 IF R$ = “SIM” THEN GOTO 60 

140 PRINT “COVARDE...” 

150 STOP 

160 PRINT “PERDEU TUDO... 

170 STOP 





T U LO 





S TABELAS DO 
COMPUTADOR 








Até agora, você já viu como podemos 
armazenar valores na memória do com- 
putador, pelo uso das variáveis. 


Rememorando, uma variável é um no- 
me simbólico, dado pelo programador 
a uma ou mais memórias do computa- 
dor, de modo a indicar onde será arma- 
zenado um determinado valor. Até ago- 
ra, aprendemos que existem em BASIC 
dois tipos fundamentais de variáveis: 


- as variáveis numéricas à 
- as variáveis literais (ou alfanumé- 
ricas) 


As variáveis numéricas servem apenas 
para armazenar números. Por exemplo: 


5 LET NUM = 12.6 
15 LET MEDIA = (NI + N2)/2 


No primeiro exemplo, estamos dando 
ao computador uma instrução para ar- 
mazenar o valor numérico 12.6na variá- 
vel que chamamos de NUM. 


No segundo exemplo, estamos dando 
uma instrução para armazenar na variá- 
vel chamada MEDIA, o resultado da ex- 
pressão aritmética à direita do sinal de 
igualdade (que por sua vez está usando 
o conteúdo de duas outras memórias, ou 


seja, Nl e N2). 


As variáveis literais, por sua vez, ser- 
vem para armazenar palavras frases, 
etc., ou qualquer outra seguência de 
simbolos que o computador consiga ge- 
rar. Por exemplo: 


- 12 LET NOMES = “"TANCREDO 
NEVES” 


15 LET ESPACOS = * : 

20 LET XINGAS = "$7..8...º8 29” 

30 LET AVIÃOS = "Mala" 

Observe que é necessário colocar o si- 
nal de cifrão ($) no final do nome de uma 


variável literal, o que serve para “avisar” 
ao computador que aquela variável de- 


7a 


verá ser usada para armazenar caracte- 
res e não valores numéricos. (Por exten- 
são, dizemos que esse tipo de variável 
serve para armazenar valores literais, 
embora eles não sejam exatamente 
valores.) 


Além disso, podemos ver, pelo tercei- 
ro exemplo, que é possível armazenar 
caracteres gráficos dentro de uma variá- 
vel literal. Para conseguir istono TK 85, 
basta pressionar as teclas SHIFT e 9, lo- 
go depois de termos digitado o primei- 
ro sinal de aspas: 





Esta combinação de teclas causa o 
aparecimento do cursor (& na linha de 
entrada, o que possibilita a digitação de 
caracteres gráficos, a partir dai: 








Depois de digitar os gráficos, devemos 
pressionar de novo asteclas SHIFT e 9, 
para podermos teclar o sinal de “fecha 
aspas”. 





Você deve se lembrar também de que 
o nome de uma variável literal pode re- 
presentar mais do que uma “caixinha” 
na memória do computador (reveja o es- 
quema da página 27). Na realidade, ca- 
da letra ou caractere entre as aspas irá 
ocupar uma memória após a outra. O 
conjunto de memórias usado para ar- 
mazenar todos os caracteres de um va- 
lor literal recebe o nome técnico de cor- 
dão, neste caso (o nome correspondente 
em inglês, string, também é muito 
usado). 


m novo tipo 
de conjunto 
dJ 


Neste capítulo, vamos conhecer um 
novo tipo de conjunto. Com ele, pode- 
mos utilizar um nome único de variável, 
para armazenar vários valores separa- 
dos. Eles são chamados de conjuntos in- 
dexados e são muito úteis para se colo- 
car na memória do computador coisas 
organizadas na forma de tabelas. 





Para entender melhor como funciona 
um conjunto desse tipo, vamos bolar' 
um programa para construir uma tabe- 
la dos pontos ganhos pelos vários times 
de futebol em um campeonato. 


Uma maneira de realizar isto com as 
variáveis “normais” que você aprendeu 
até agora seria: 


10 PRINT “CAMPEONATO BRASI- 
LEIRO DE FUTEBOL' 

20 PRINT" TABELA DE PONTOS 
GANHOS” 

30 PRINT 

40 REM 

50 REM === ENTRADA DE 
DADOS 

60 REM 

70 PRINT “ENTRE O NUMERO DE 


- PONTOS GANHOS” 
75 PRINT "PARA CADA TIME DA 
TABELA:” 
80 PRINT 
9% PRINT “TIME NUMERO 1 ? ”; 
100 INPUT T1 
10 PRINT TI 
120 PRINT “TIME NUMERO 2? ”; 
130 INPUT T2 
140 PRINT T2 


e assim por diante. Teríamos que colo- 
car, em seguida, várias linhas seme- 
lhantes, para entrar os valores dos times 
T3, T4, T5 etc., até incluir todos os times 
(quantos existissem!). 


Em seguida, poderíamos escrever um 
outro pedaço do programa, para mos- 
traro número médio de pontos do cam- 
peonato, por exemplo: 


400 LET MEDIA = (T1I + T2 + T3 
+ T4 + T5)5 

410 PRINT 

420 PRINT "MEDIA DOS PONTOS 
GANHOS = “MEDIA 

430 STOP 


Você já percebeu que esse método de 
programação é muito trabalhoso, e mui- 
to limitado: 


— tenho que definir de antemão o nú- 
mero de times que vão figurar na tabe- 
la. Se este número mudar depois, terei 
que modificar o programa em vários lu- 
gares (inclusive na fórmula da linha 
400); 


— quanto maior for o número de times, 
mais comprido será o programa, e mais 
trabalhoso será escrevê-lo. 


Por isso, seria ideal se pudéssemos usar 
umúnico nome para as variáveis T1, T2, 
T3 etc. Assim, poderíamos guardar os 
diversos valores numéricos em “caixi- 
nhas” ligadas umas nas outras, mais ou 
menos como no caso das variáveis li- 
terais. 


Felizmente, existe esse tipo de variável 
conjunta na linguagem BASIC. Com 
ela, podemos utilizar um único nome 
(por exemplo, T) para a área de memó- 
riaque armazenará os pontos ganhos de 
cada equipe: 


área de memória 


variável T 12 /10/9/5]3 
número da LI 234 SB 
memória 


Para colocar um valor nessetipo de va- . 


riável, podemos usar um comando LET 


ou comando INPUT: 
100 INPUT T(1) 


O valor entre parênteses, que vem de- 
pois do nome do conjunto, é chamado 
de índice ou subscrito. Ele indica qual 
éa 'caixinha” onde será colocado o va- 
lor digitado pelo teclado. Neste exem- 
plo, a memória indicada é a 1, ou seja, 
o número de pontos ganhos será arma- 
zenado para o primeiro time. Outro 
exemplo: 


05 LET T(5) = 3 


Aqui, estamos dando a seguinte ins- 
trução ao computador: 


PEGUE o número 3 e ARMAZENE na 
memória número 5 da variável chama- 


da T. 


Da mesma forma que os comandos 
LET e INPUT, podemos usar uma variá- 
vel indexada dentro de outras instru- 
ções, como o PRINT. Por exemplo, se 
dermos a instrução: 


56 PRINT T (5) 
estamos querendo dizer: 


PEGUE o valor contido na “caixinha” 
número 5 da variável Temostrenatela. 


Ou ainda: 
57 LET SOMA = T(1) + T(2) 
o que quer dizer: 


SOME os valores contidos nas memó- 
rias le2davariável T, earmazeneore- 
sultado na variável chamada SOMA. 


As memórias chamadas T(1), T(2), T(5) 
etc., neste exemplo, recebem o nome de 
variáveis indexadas, porque são assina- 
ladas por um índice, ou seja, o número 
de ordem delas, no conjunto. 


As memórias T(1), T(2) etc. são chama- 
das também de elementos de T. 


Também são muito usados estes no- 
mes: variaveis subscritas (indexadas) e 
subscritos (índices). 

Quando queremos ler em voz alta (pro- 
nunciar) o nome de um elemento subs- 
critado, falamos assim: 

B(5) bêíndice5  oubêgsubs5 
G(N) gê índice ene ou gê sub ene 


Portanto, um conjunto ocupa na me- 


mória uma série de “caixinhas” indivi- 
duais, cujo “endereço” consiste num no- 
me comum, seguido do subscrito, entre 
parênteses: 


conteúdo 


endereço 





À grande vantagem desse tipo de va- 
riável é que os índices dos elementos 
também podem ser variáveis. 


Veja este exemplo: 


1000 LET V(1) = 456 

I010 LET V(2) = 132 

1020 LET V(3) = 0 

1030 PRINT 

1040 PRINT “QUE VALOR QUER 
VER (1, 20U 3)? ”; 

1050 INPUT N 

1060 PRINT N 

1070 PRINT “VALOR = “;V(N) 

1080 GOTO 1030 


— Às linhas 1000 1010 e 1020 servem 
para colocar valores numéricos dentro 
dos elementos 1, 2e 3 do conjunto V. 


— Às linhas 1040 e 1050 servem para 
perguntar ao usuário qual é o número 
de ordem do elemento que ele quer ver 
na tela (este número é armazenado na 
variável N). 


— À linha 1060 serve para mostrar na 
tela o conteúdo do elemento N do con- 
junto V! 


Eis como ficaria um exemplo de utili- 
zação do programa: 


Primeiro vamos examinar o conteúdo 
do segundo elemento do conjunto (pa- 
ra isto digitamos o valor 2, quando apa- 
rece a pergunta na tela): 





O programa mostra o valor pedido, em 


seguida repete a pergunta. Agora que- 
remos examinar o elemento número 1: 


na 





ornando 
o programa 
mais eficiente 








Vamos usar agora o nosso conheci- 
mento a respeito das variáveis indexa- 
das, para modificar o programa da tabe- 
la de pontos do campeonato. Inicial- 
mente, vamos fazer um programa para 
cinco times apenas: 


10 PRINT "CAMPEONATO 
BRASILEIRO DE FUTEBOL 

20 PRINT“TABELA DE PONTOS 
GANHOS” 

30 PRINT 

40 REM 

50 REM === ENTRADA DE 
DADOS 

60 REM 

70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 

75 PRINT “PARA CADA TIME DA 
TABELA:” 


80 PRINT 
85 FORN = 1 TOS 
90 PRINT “TIME NUMERO “;N;" ? *, 
100 INPUT T(N) 
10 PRINT T(N) 
120 NEXT N 
130 REM 
140 REM === CALCULO DA 
MEDIA 
150 REM 
160 LET SOMA = 0 
170 FORN = 1 TOS 
180 LET SOMA = SOMA + T(N) 
190 NEXT N 
2W) REM 
210 REM === MOSTRA 
RESULTADOS 
220 REM 
400 LET MEDIA = SOMA/5 
410 PRINT 
420 PRINT “MEDIA DOS PONTOS 
GANHOS = “MEDIA 
430 STOP 


Eis aqui um exemplo de utilização do 
programa: 


CAMPEONATO BRASILEIRO DE 
FUTEBOL 
TABELA DE PONTOS GANHOS 


ENTRE O NUMERO DE PONTOS 
(GANHOS PARA CADA TIME DA 
TABELA: 


TIME NUMERO 1 ? 23 
TIME NUMERO 2 ? 12 
TIME NUMERO 3? 9 
TIME NUMERO 4? 7 
TIME NUMEROS ? 4 


MEDIA DOS PONTOS 
GANHOS = 11 


Vamos entender agora como funciona 
o programa. 


Para isto, vamos fazer o oposto do que 
foi ensinado para você. Vamos fazer 
agora o fluxograma do programa (nor- 
malmente ele deve ser feito antes deste 
ser escrito, lembra-se?). 


Para representar uma alça do tipo FOR 
... NEXT, usamos os blocos abaixo: 


> 


Desse modo, o programa ficaria assim: 


“CAMPEONATO BRASILEIRO DE FUTEBOL" 
“TABELA DE PONTOS GANHOS” 


“ENTRE O NUMERO DE PONTOS GANHOS” 
“PARA CADA TIME DA TABELA:” 


FORN = 1TOS 


“TIME NUMERO ";N;" ? "; 


















Rad e A ie cc 


MEDIA = SOMA/5 
“MEDIA DOS PONTOS GANHOS = ";MEDIA 





À primeira alça, que vai da linha 85 a 
120 serve para entrarmos sucessiva- 
mente os times de 1 a 5. À variável N é 
usada como contadora da alça e, ao 
a tempo, como índice do conjun- 
to 1. 


Esta é uma técnica muito usada na pro- 
gramação de conjuntos, e se cnama in- 
dexação indireta. 


Você pode ver que, a cada valor de N 
incrementado pelo FOR, o programa re- 
ferencia um novo valor de T nas linhas 
100 (INPUT) e 110(PRINT). Ao mesmo 
tempo, serve também para indicar ao 
usuário qual o número do time para o 
qual ele deve digitar os pontos ganhos. 


Valor de N Elemento Valor digitado 
referenciado (exemplo) 


] T() 

2 T(2) 12 
3 T(3) 9 
4 T(4) 7 
5 T(S. 4 


À segunda alça, que vai das linhas 170 
a 19 serve para calcular a soma dos 
pontos ganhos por todos os times. Esse 
valor será usado no cálculo da média, 
dividindo-o depois por 5. Para servir co- 
mo acumuladora, usamos a variável SO- 
MA, que deve ser zerada antes da entra- 
da na alça (linha 160). 


Portanto, como você viu, o programa fi- 
cou muito mais bem escrito, conciso e 
eficiente. 


Podemos perceber mais facilmente a 
utilidade do conjunto indexado se tiver- 
mos que mudar o número de times. Por 
exemplo, se fossem dez times em vez de 
cinco, teríamos que mudar apenas as li- 


nhas 85, 170 e 400: 
85 FORN = 1TOIO 
IZ0FORN = 1 TO 10 
400 LET MEDIA = SOMA/10 


Você já percebeu que seria muito mais 
fácil colocar o número de times como 
uma variável NT, que seria perguntada 
ao usuário logo no início do programa, 
assim: 


52 PRINT “QUANTOS TIMES ?” 
54 INPUT NT 


Assim, o programa fica muito mais ge- 
nérico, ou seja, pode ser usado em qual- 
quer situação, sem necessidade de se 
mudar o programa a cada momento. 
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Outra modificação interessante que 
podemos fazer ainda é mostrar denovo, 
em uma tela limpa, os valores digitados, 
antes da média. Isto é possível porque 
eles estão todos armazenados no con- 
junto T. 


Portanto, o nosso programa modifica- 
do fica assim agora: 


10 PRINT “CAMPEONATO 
BRASILEIRO DE FUTEBOL 

20 PRINT “ TABELA DE PONTOS 
GANHOS” 

25 PRINT” VERSÃO? 

30 PRINT 

40 REM 

50 REM === ENTRADA DE 
DADOS 


51 REM 

52 PRINT “QUANTOS TIMES ?” 

54 INPUT NT | 

70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 

75 PRINT “PARA CADA TIME DA 
TABELA:” 


85 FORN = ITONT 
90 PRINT “TIME NUMERO ";N;" ? *; 
100 INPUT T(N) 
110 PRINT T(N) 
120 NEXT N 
130 REM 
140 REM === CALCULO DA 
MEDIA 
150 REM 
160 LET SOMA = 0 
165 CLS 
170 FOR N=1 TONT 
175 PRINT “TIME NUMERO CN” = 
“T(N); “PONTOS GANHOS” 
180 LET SOMA = SOMA + T(N) 
190 NEXT N 


200 REM 

210 REM === MOSTRA 
RESULTADOS 

220 REM 

400 LET MEDIA = SOMA/NT 

410 PRINT 


420 PRINT “MEDIA DOS PONTOS 
GANHOS = “MEDIA 
430 STOP 


A tela com os resultados ficaria assim 
agora: 


TIMENº 1 = 23 PONTOS GANHOS 
TIME Nº 2 = 12 PONTOS GANHOS 
TIME Nº 3 = 9 PONTOS GANHOS 
TIME Nº 4 = 7 PONTOS GANHOS 
TIME Nº 5 = 5 PONTOS GANHOS 


MEDIA DOS PONTOS 
GANHOS = 11 
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po 


Um conjunto indexado, como o que 
você viu nos exemplos acima, pode ser 
considerado também como se fosse uma 
lista. O outro nome técnico que se dá a 
esse tipo de conjunto é vetor. 





Para diferenciar uma variável numéri- 
ca, que só pode armazenar um valor de 
cada vez, de uma variável conjunta, usa- 
mos à seguinte nomenclatura: 


variável numérica simples = 
CALAR 
variável numérica conjunta = 
VETOR 


A nomenclatura acima é tirada da ál- 
gebra linear (uma parte da matemática). 


Quantos elementos pode ter um con- 
junto na memória? 


Existem algumas limitações quanto ao 
emprego desses elementos no BASIC do 
computador que você está usando. 


Inicialmente, um conjunto numérico 
pode ter no máximo, dez elementos, o 
que dá para algumas aplicações, mas pa- 
ra outras é muito pouco. Por exemplo, se 
quiséssemos colocar todos os times da 
Copa Brasil, seria muito mais do que dez, 
e o computador não aceitaria. 


Entretanto, existe um jeito de colocar 
mais de dez elementos em um conjunto. 


Para isto, temos que declarar previa- 
mente ao computador quantas memórias 
ele tem que reservar para o conjunto, se 
ele for conter mais de dez elementos. 


O comando pelo qual se faz essa de- 
claração chama-se DIM (que significa 
DIMensão). 


Dimensionamento é o termo que usa- 
mos para dizer quantos elementos, no 
máximo, conterá o conjunto. 


No exemplo dos times, se quiséssemos 
colocar um máximo de setenta times, por 
exemplo (N = 70), seríamos obrigados a 
colocar no programa a seguinte linha: 


45 DIM T(70) 


Esta declaração está dizendo ao 
computador: 


RESERVE uma dimensão de setenta 
elementos para o conjunto chamado T. 


Outras limitações de memória parao 
dimensionamento dos conjuntos são às 
seguintes: 


- um conjunto não pode ter mais de 
65 535 elementos. Se este número for ul- 
trapassado por engano, o computador 
indicará a mensagem de erro tipo B: 


- cada elemento de um conjunto ocu- 
pa quatro bytes. A soma dos números de 
todos os elementos de conjuntos dimen- 
sionados implicitamente (isto é, menos 
de onze elementos) e explicitamente 
(pelo comando DIM) não deve ser supe- 
rior à quantidade de memória central 
disponível (o que está sobrando, fora o 


programa). 


Se, na execução de um programa, à 
quantidade de memória não for suficien- 
te para todas as variáveis e conjuntos de- 
finidos, o computador indicará um erro 
tipo 4. Quando isso acontece, muitas ve- 
zes o número da linha onde ocorre o er- 
ro (que, na mensagem de erro na tela, 
aparece depois do sinal /) pode estar in- 
completo ou errado, devido também à 
falta de memória. Por exemplo, a mensa- 
gem 4/200 poderá aparecer incompleta, 
assim: 4/2, dando uma indicação falsa. 


Igumas regras 
para o DIM 








Podemos repetir o comando DIM pa- 
ra quantos conjuntos houver no meu pro- 
grama. Deve-se usar um comando DIM 
para cada conjunto. 


10 DIM A(65) 
15DIM B(12) 
20 DIM FG(8) 


Observe, nesse exemplo, que o con 
junto FG, por ter menos de oito elemen- 
tos, não precisa ser colocado na linha 
DIM. Entretanto, muitos programadores 
têm hábito (aliás, muito salutar) de decla 
rar no começo do programa todas as va- 
riáveis indexados, para fins de doc 
mentação. 


Outra regra importante para o uso de 
DIM é que ele pode ser colocado em 
qualquer ponto de um programa, porém 
sempre antes de ser referenciado o car 
junto pela primeira vez. 


Assim, estaria errado o seguinte 
programa: 


10 FOR I=1 TO 100 
20 INPUT T(1) 

3% NEXTI 

40 DIM T(100) 


O programa só iria indicar o erro 
quando, durante a execução, a variável 
contadora 1 atingisse o número 11. Isso é 
explicado pelo fato de que o interpreta- 
dor BASIC “garante” a dimensão de um 
conjunto, mesmo que não declarado em 
DIM, até dez elementos! O erro indica- 
do pelo computador será de tipo 3 (subs- 
crito fora da faixa). | 


Em consequência, outra regra muito 
importante para o uso correto do DIM é 
que não se deve dimensionar um conjun- 
to com um número menor do que o valor 
dimensionado. Por exemplo: 


5 DIM T(S0) 

10 FOR 1=1 TO 100 
20 LET T(D=0 

3% NEXTI 


O programa iria executar normal- 
mente, até atingir 1 = 51, quando então 
o índice na linha 20 seria maior do que 
a capacidade do conjunto T. 


Os conjuntos numéricos definidos em 
BASIC têm a seguinte característica im- 
portante: existe sempre um elemento nu- 
merado com o zero. Por exemplo: T((0) é 
um elemento válido do conjunto dimen- 
sionado T: 


DIM T(5) 


eljajo fas 


Esse elemento pode ser usado por co- 
mandos INPUT, LET, PRINT etc., sem 
problemas. Por isso, o conjunto T dimen- 
sionado como no exemplo acima, na rea- 
lidade tem seis elementos do comando 
DIM disponíveis, e não cinco, como po- 
deria parecer. Você pode decidir usá-lo 
ou não, dependendo da finalidade do 
programa. 


Finalmente, outra particularidade da 
declaração DIM. 


Nos computadores com a lógica Sin- 
clair, isto é, o TK83, o TK85, o CP200 etc, 
podemos redec/arar um conjunto, ou se- 
ja, mudar a sua dimensão em pontos di- 
ferentes do programa. Por exemplo: 


10 DIM A(10) 
20 FOR I=TO 10 
3% LET A(1)=1 


40 NEXTI 
50 DIM A(S) 


etc. 
Neste caso, o conjunto À inicial é can- 


celado da memória (e com ele os dados 
armazenados), e é dimensionado um 


conjunto À com apenas cinco elementos. 


É preciso observar entretanto, que is- 
so não é permitido na linguagem BASIC 
padrão e em muitos outros computado- 
res. Nesses outros computadores é neces- 
sário dar antes o comando ERASE ou 
CLEAR, dependendo da marca, para 
“limpar” a memória para outro conjunto 
com o mesmo nome. 


EXERCIDO 


1. Indique abaixo se uma variável é inde- 
xada do tipo vetor (V), indexada do tipo 
matriz (M) ou escalar (E) 


A(3)--- A3--- X(5) --- ZZ2---T(12,14).-- 
N(7)--- 1 --- 12,2)--- 122---VETOR --- 


2. Modifique o programa de cálculo dos 
pontos ganhos dos times, de modo que 
mostre na tela de resultados qual a dife- 
rença entre o número de pontos ganhos 
por cada time e a média geral. Por 


exemplo: 


- TIME NUMERO 1 = 23 PONTOS 
GANHOS. DIFERENCA DA ME- 
DIA = 12 PONTOS 
TIME NUMERO 2 = 12 PONTOS 
GANHOS. DIFERENCA DA ME- 
DIA = 1 PONTO 


etc. 
3. Sejao conjunto C, com cinco elemen- 
tos. Preencha os elementos de À com os 
valores abaixo: 


3.1. C(0) = 3 


C(3) = 
Ciá) = C(1)+C(3)/2 
C(5) = C(1)+2 


E agora escreva abaixo o que cada um 


e in cr ca 


3.2. 10 FORI=0 TOS 
20 PRINT C(I); 
30 NEXTI 


3.3. 10LETN=3 
20 PRINT C(1)+C(N)-C(N+2) 
30 PRINT N+2 + C(N-3) 


3.4. 10 LET C(S)=C(C(0)) 
20 PRINT C(5);C(0) 


4. Considere que osconjuntos Ae Beas 
variáveis escalares X, Y e Z abaixo rece- 
beram os seguintes valores: 


Mo 5 83 
A(2) 25 BI) 123 
AG) 9 B(2) 85 


E indique agora quais serão os 


valores amostrados pelos comandos 
abaixo: 


xXx 0 
Z 1 
& 2 


PRINT A(1) ---- 
PRINT Z 


PRINT B( 
PRINT A(A(1)-Z)--- 


PRINT A(B(0)) ---- 
PRINT B(Y)-—Y --.. 


5. Indique o que cada programa abaixo 
mostrará na tela: 


5.1. 10 DIM VET(8) 
20 FORI=0 TO8 
30 LET VET (D)=1+1 
40 NEXTI 
50 PRINT VET (0, VET(2), 
VET (4), VET(6), VET(8) 
5.2. 10 DIM A(10) 


20 DIM B(10) “ 
30 FORI=1 TO 10 


abelas e matrizes 


O comando DIM também pode ser 
usado para definir na memória outro ti- 
po de conjunto: as tabelas ou matrizes. 





Uma tabela consiste em um arranjo de 
elementos de memória dispostos em 
duas dimensões. Por exemplo, as notas 
dos alunos de uma classe, nas várias 
matérias: 


MATERIAS 


1 2 3 
MATEMATICA PORTUGUES HISTORIA 


ALUNO Nº 
l 8.5 5 9 
2 6.5 10 4.5 
3 7.5 8 5 
+ 2 3 LS 


Uma tabela é organizada em linhas e 
colunas. No exemplo acima, as linhas 
são os alunos. Cada linha contém, no 
exemplo, três colunas, correspondentes 
às matérias. 


Na memória do computador, esses da- 
dos seriam armazenados da seguinte 
forma: 


COLUNAS 


LINHAS 


Um elemento de uma tabela ou matriz 
é indicado por dois subscritos, em vez de 
um: o número da linha, seguido pelo nú- 
mero da coluna. 


Por exemplo: 


O ELEMENTO na LINHA 3e COLU- 
NA 2 é igual a 8. 


Ele corresponde à nota de Português 
do aluno nº 3. 


Da mesma forma como nos conjuntos 
numéricos que você aprendeu até ago- 
ra (vetores) podemos usar um único no- 
me de variável para indicar uma tabela. 
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Por exemplo, o conjunto acima poderia 


ser chamado de NOTA. 


E necessário usarmos a declaração 
DIM, também no caso das tabelas, para 
indicar ao computador qual é a área de 
memória que ele precisa reservar para 
armazenar o conjunto. 


No exemplo acima, usaríamos a de- 
claração. 


DIM NOTA (4,3) 


DIM NOTA: nome da variável 
(4,3): nº de linhas e nº de colunas 


A referência a um elemento de um 
conjunto desse tipo é feita da seguinte 
forma: 


PRINT NOTA (3,2) 


PRINT NOTA: nome da variável 
(3,2): índice da linha e índice da coluna 


Dizemos que o conjunto NOTA acima 
é um conjunto bidimensional, isto é, ele 
tem duas dimensões (linhas e colunas). 


O conjunto (5), por exemplo, é então 
chamado, por analogia, de unidimensio- 
nal (só tem uma dimensão). 

Não confunda o termo dimensão com 
o tamanho (ou dimensionamento) de um 
conjunto expresso pela declaração DIM. 

DIM A(25) -—» oconjunto À tem 
uma dimensão e 
está dimensiona- 
do para 25 ele- 








DIM B(20,35) — o conjunto B tem 
duas dimensões e 
está dimensiona- 
do para 20 linhas 


e 35 colunas 

Na referência a um elemento de uma 
tabela ou matriz, os subscritos (índices 
de linha e coluna) também podem ser 
variáveis ou expressões: 

PRINT A(X,5) 

INPUT B(1,)) 

LET (1,1) = B(X+25Y +14-2) 
etc. 

É preciso lembrar também que o ele- 
mento (Q) é automaticamente reservado 
em uma tabela de duas dimensões, com 
o comando DIM. Por exemplo: 

DIM NOTA (4,3) 
gera automaticamente os elementos 


NOTA (0) 


NOTA (0,1), NOTA (0,2) .... 
NOTA (0,3) 


NOTA (1,0), NOTA (0,2) .... 
NOTA (0,3 


É mais fácil entender a correspondên- 
cia entre subscritos de um conjunto bidi- 
mensional, e sua organização na memó- 





mentos ria, examinando o esquema abaixo: 
O NOTA(O) NOTA) NOTA) NOTA; 
2 NOTAQO)  NOTAQI eu “NOTA 122 NOTA (25 
3 NOTAGO) NOTAG)  NOTAGA  NOTAG: 
(40) | NOTA la, ni — NOTA(42)  NOTA( : 
ementos dum bela iguala: a | 

Rei del Dx (+= a sireipico 





Nesse caso, você já está percebendo 
que é desvantajoso deixar de utilizar os 
elementos com subscrito ) em uma ma- 
triz, pois estaríamos desperdiçando mui- 
to espaço. No exemplo acima, oito ele- 





mentos da matriz ficarão em branco (em- 
bora ocupem espaço na memória) se não 
forem usados. Quanto maior a matriz, 
maior será o número de elemento: 
() desperdiçados. 





Tal como acontece com os vetores 
(conjuntos unidimensionais), usamos as 
alçastipo FOR...NEXT para realizar pro- 
gramações com conjuntos bidimensio- 
nais. Nesta seção aprenderemos alguns 
truques dessas programações. 


Vamos tomar como exemplo, inicial- 
mente, o seguinte problema: como pode- 
mos programar a entrada das notas de to- 
dos os alunos nas três matérias em uma 


tabela na memória? 


Existem várias maneiras de resolver 
esse problema. Vamos ver as três técnicas 
principais: 


1. Sem alças 


O programa para entrada dos dados 
poderia ser feito assim: 





O programa teria que repetir doze ve- 
zes cada linha PRINT e INPUT acima, 
para as três notas de cada aluno da 
classe. 


Já vimos que esse método é bastante 
ineficiente, produz programas muito lon- 
gos e repetitivos, e não pode ser expan- 
dido com facildiade. Somente se justifi- 
ca seu uso quando o número de ele- 


mentos da matriz a ser entrada é muito 
pequeno. 


2. Com uma alça 


* Evidentemente, uma maneira mais fá- 
cil e sintética de se resolver o problema 
acima é usar uma alça FOR...NEXT pa- 
ra gerar, repetitivamente, os índices do 
conjunto NOTA, para cada aluno. 





Note que a alça que vai da linha 20 até 
a linha 9 repete sempre a mesma se- 
quência de entrada de três notas, para 
cada um dos quatro alunos. 


A variável de controle I da alça é usa-. 


da para variar o índice de linha da matriz 
NOTA. A sua ação seria semelhante à 
geração de doze comandos INPUT su- 
cessivos, assim: 


I comando 


] INPUT NOTA (1,1) 
INPUT NOTA (1,2) 
INPUT NOTA (1,3) 


2 INPUT NOTA (2,1) 
INPUT NOTA (2,2) 
INPUT NOTA (2,3) 


' 


5 INPUT NOTA (3,1) 
INPUT NOTA (3,2) 
INPUT NOTA (3,3) 

e assim por diante. 


Esse método ainda tem também a des- 
vantagem de levar-nos a alterar o progra- 
ma, se o número de matérias (e de notas 
por aluno) for maior do que 3. Entretan- 
to, se o número de colunas da matriz for 
pequeno, a técnica pode ser usada. 


3. Com duas alças “ 


Evidentemente, essa é a técnica mais 
genérica e sintética (ou seja, com ela po- 
demos escrever um programa que faça a 
mesma coisa que os outros, em um nú- 


mero menor de linhas de BÁSICO). 
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Essa técnica utiliza duas alças 


FOR... NEXT, uma dentro da outra. Uma 
alça é utilizada para controlar os índices 


das linhas (estudantes), e a outra, para 
controlar os índices das colunas (notas): 





Veja o que apareceria na tela do com- 
putador, quando o programa fosse 
executado: 


ALUNO 1 NOTA 1º 
ALUNO 1 NOTA 2? 
ALUNO 1 NOTA 3? 
ALUNO 2 NOTA 1º 
ALUNO 2 NOTA 2? 
ALUNO 2 NOTA 3? 
ALUNO 3 NOTA 1? 


etc. 
até completar todos os alunos e notas. 


À alça externa, com a variável I, serve 
para aumentar o índice da matriz NOTA, 
de lem 1. 


À alça interna, coma variável J, serve 


para aumentar o índice da matriz NOTA, 
de leml. 


Desse modo, dizemos que a alça inter- 
na varia (aumenta) mais depressa que a 
alça externa. 


Em outras palavras, para cada aluno, 
o índice] varia de 1 a 3. Portanto, a entra- 
da dos dados é feita por colunas. 


Poderíamos, neste exemplo, ter adota- 
do uma outra forma de entrada dos da- 
a a 

nos, para cada uma das matérias. Por 
exemplo, primeiro entraríamos todas as 
nr prio and 
e depois de História. 





Observe que precisamos mudar ape- 
nas as linhas 20 e 30. 


Agora a sequência de mensagens na 


tela ficaria assim: 


ALUNO 1 NOTA 1? 
ALUNO 2 NOTA 1? 
ALUNO 3 NOTA 1? 
ALUNO 4 NOTA 1? 
ALUNO 1 NOTA 2? 
ALUNO 2 NOTA 2? 
ALUNO 3 NOTA 2? 


ALUNO 4 NOTA 2? 


etc. 
até completar todos os alunos e notas. 


À alça externa, com a variável J, serve 
e IN 
em 1. 


À alça interna, com a variável I, serve 
ir ACO ar, 
de leml. 






abelas de qualquer 
tamanho 





Uma grande vantagem do esquema 
de programação com duas alças é que 
podemos fazer um programa para qual- 
quer número de alunos ou de matérias, 


pois o valor limite das alças Ie] pode ser 
entrado como -uma variável do 


programa. | 
Veja o exemplo abaixo: 





Observe que demos agora uma capa- 
cidade maior à matriz NOTA, de modo a 
comportar notas de até 50 alunos e 15 
matérias. 


Novamente, com apenas duas peque- 
nas mudanças nas linhas 20 e 30 do pro- 
grama, ele continua sendo válido para 
qualquer número de alunos e de notas 
(desde que não ultrapassem os limites 
impostos pela declaração DIM, é claro!) 


As alças “embutidas” (ver página 53) 
podem ser utilizadas também para mos- 
trar o conteúdo dos elementos de uma 
matriz, por meio do comando PRINT, ou 
para cálculos (por exemplo, cálculo das 
médias de cada aluno). 


'* Vejaoexemplo abaixo, ainda utilizan- 
do a tabela de notas: 





Este programa mostraria na tela o se- 
(com os dados da tabe- 


la de exemplo): 


ALUNO 1 NOTA 1 
ALUNO 1 NOTA 2 
ALUNO 1 NOTA 3 
ALUNO 2 NOTA 1 
ALUNO 2 NOTA 2 = 10 
ALUNO 2 NOTA 3 = 4.5 


HH MI 
D (O (po 
[6 ;| [6 >| 


ALUNO 3 NOTA 1 = 7.5 


etc. 
óbvio que essa não é uma maneira 


muito elegante de apresentar uma tabela 
de notas. 
Mas, com pequenas modifi no 








Agora os resultados aparecerão assim 


ALUNO 1 - 8.5 5 9 
ALUNO 2 - 6.5 ID 45 
ALUNO 3- 7.5 8 õ 
ALUNO 4 - 2 3 1.5 


Vamos entender como essa parte do 
programa funciona: 


A linha 105 escreve na tela a palavra 
ALUNO, seguida do seu número (no ca- 
so, o conteúdo da variável I, que é au- 
mentada de 1 em 1 pela alça da linha 
100). O ponto-e-vírgula colocado no fi- 
nal dessse comando assegura que o pró- 
ximo comando PRINT escreva na mesma 
linha (logo após o sinal de subtração). 


A linha 120 escreve na tela todas astrês 
notas para o aluno 1, sempre na mesma li- 
nha, pois também tem um ponto-e- 
vírgula no seu final. 


A expressão que usa a função TAB 
serve para alinhar (colocar nas mesmas 
colunas, na vertical) cada uma das notas 
das matérias. 


Relembrando, a função TAB n vai mo- 
ver a posição de impressão (cursor) na 
tela, até a coluna n. TAB significa tabu- 


| (Omesmoesquema de duas alças tam- 

bém pode ser utilizado para realizar cál- 
culos ou comparações lógicas com os 
elementos de uma matriz. 


Vamos imaginar, por exemplo, que 
190 LETSOMA =0 


200 FORI=1 TO 4 
210 FOR]=1 TOS 


- 220 LETSOMA = SOMA + NOTA A DE 


238 NEXT) 

240 NEXTI 

250 LET MED = SOMA/12 
260 PRINT À 
270 PRINT “MEDIA = “; MED 


Essa parte do programa, portanto, pe- 
garia cada um dos elementos da matriz 
NOTA em seguida, através da variação 
dos índices 1 e J, e somaria à variável 


SOMA. 


Não precisamos, necessariamente, fa- 
zer variar os dois índices da matriz NO- 


lação, e funciona exatamente como ota: 
bulador de uma máquina de escrever. 


muito útil, portanto, para a programação 
de tabelas. 


A expressão entre parênteses será cal- 
culada, dentro de cada repetição de le 
J, e irá determinar esta nova posição n: 


J valor da expressão ("10 +3) 
l (1x10 + 3) 13 
2 (2x 10 + 3) 23 
3 (3x 10 + 3) 33 


Portanto, vemos que cada nota come- 
çará nas colunas 13, 23e 33 da mesmali- 
nha, respectivamente. 

O comando PRINT na coluna 150, Por 
sua vez, serve para passar O cursor para 
alinha seguinte. Se ele não fosse coloca- 
do aí (ou seja, depis de terminar todas as 
notas de uma linha, ao final da alça), as 
notas do próximo aluno continuariam a 
ser mostradas na mesma linha do aluno 
anterior, pois existe um ponto-e-vírgula. 
Colocando-se o PRINT sozinho, essa li- 
nha é encerrada, e passar-se à próxima. 


Experimente colocar o programa no 
computador e retirar a linha 150 para ver 
o que acontece! 


queremos saber qual foi a média de todas 
as notas tiradas para a classe. 

Para isso, primeiro vamos ter que so- 
mar todas as notas contidas na matriz 
NOTA, e depois dividir pelo total de no- 
tas, certo? 


----» zerar um acumulador 


— ---—» repetir para alunos de 1 a 4 


---» repetir para notas de la 3 
---» acumular a soma com a nota 
“---» próxima nota do aluno Í 
---> próximo aluno 
---»calcula a média 


e: 


TA, através de alças FOR...NEXT. 


Vamos imaginar, por exemplo, que 
queremos saber apenas a médida das 
notas de todos alunos para uma determi- 
nada matéria. Para isto, a variável SOMA 
deveria seg acumulada apenas com os 
valores da coluna desejada: 





Note que a linha 310 soma apenas os programa, ou seja, é uma constante que 
elementos não varia, ao passo que o índice de linha 
(alunos) varia de 1 a 4, através da alça I 


NOTA (1,1) NOTA(21) NOTA(31) — dalinha S00. 


e NOTA (4) Para tornar mais geral esta parte do 


programa, poderíamos perguntar ao 
Isso ocorre porque o índiceda coluna ' usuário de que matéria ele deseja saber 


(no caso, coluna 1) está fixo dentro do a média. 





Ou ainda, poderíamos obter automa- | rias, usando uma alça externa para fazer 
ticamente as médias para todasasmaté- | variar os índices de coluna: 





Observe que estamos usando asmes- ' queremos armazenar os valores das mé- 
mas variáveis, SOMA e MED, paraocál- ' diasdetodasasmatérias. À variável SO- 
culo da média de cada nota. Isso real- MA, portanto, deve ser zerada dentro da 
mente não tem importância, pois não | alça externa, e fora da alça interna. 
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Vamos fazer agora um programa com- 
»leto, utilizando o exemplo das notas de 
ima classe. 


Neste programa queremos fazer o 
seguinte: 


1. entrar as notas de cada aluno, emto- 
das as matérias; 


2. mostrar essas notas na tela, em for- 
ma de tabela. Aproveitamos para 
calcular e mostrar a médida aritmé- 
tica de cada aluno, nessa tabela; 


3. calcular e mostrar a médida de ca- 
da matéria. 


Vamos lá: 


20 REM = BOLETIM DE NOTAS DA 

| CLASSE - 
30 REM = BASIC PARA TK 85 
40 REM = R. SABBATINI ABRIL 1985 


60 R 
70 REM **** INICIALIZACAÃO **** 


80 REM 

90 DIM NOTA(SO, 15) 

100 CLS 

110 PRINT “CALCULO DO 
BOLETIM DE NOTAS” 

128 PRINT “=========================""* 

130 REM 

140 REM **** ENTRADA DE 


160 PRINT 

170 PRINT “NUMERO DE ALUNOS 
NA CLASSE ?”; 

180 INPUT NA 

190 IF NA > 50 THEN GOTO 170 

200 PRINT NA 

210 PRINT “NUMERO DE 
MATERIAS ?”; 

220 INPUT NM 

230 IF NM > 15 THEN GOTO 210 

240 PRINT NM 

250 REM 

260 REM **** ENTRADA DE 
DADOS de dede d 

270 REM 

280 PRINT “ENTRE AS NOTAS DOS 
ALUNOS: 

290 PRINT 

300 FOR 1=1 TO NA 

310 PRINT “ALUNO Nº “il 

320 FOR ]J=1 TO NM 

330 PRINT TAB (7);"NOTA DA 
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MATERIA “;J;" 2º; 
340 INPUT NOTA()) 
350 IF NOTA(IJ) <(0 THEN 


GOTO 340 
360 IF NOTA (1,)) > 10 THEN 
| GOTO 340 


370 PRINT NOTA(,)) 

380 NEXT] 

390 REM | 

avo ri **** MOSTRA NOTAS NA 

410 REM **** E CALCULA 
MEDIAS **** 

420 REM 

430 CLS 

440 FOR I=1 TO NA 

450 PRINT “ALUNO “7º ="; 

460 LET SOMA = 0 

470 FOR J=1 TO NM 

480 PRINT TAB(10+5*]);NOTA()); 

490 LETSOMA=SOMA + NOTA(1,)) 

500 NEXT) 

510 PRINT * MED ";SOMA/NM 

520 NEXTI 


"530 REM 


540 REM **** CALCULA MEDIA 
DAS MATERIAS **** 

550 REM 

560 FORJ=1 TO NM 

570 LET SOMA= 0 

580 FOR I=1 TONA 

590 LETSOMA=SOMA + NOTA(L]) 


620 LET MED=SOMA/NÃ 
630 PRINT “MEDIA NA MATERIA 
e e “MED 





Vamos analisar o programa linha por 
linha, agora, para podermos entender o 
que elas fazer: 


l0a50 '-Nestaslinhas colocamos um 
cabeçalho interno de iden- 
tificação do programa (au- 
tor, data, computador etc.). 


90 -Dimensionamento do con- 
junto NOTA. 


100 a 120 -Mostrar título do programa 
na tela (para que serve). 


170 a 180 -Pergunta quantos alunos 
tem, e entra na variável NA. 


190 -Testa se NÃ é maior do que o 


permitido pelo comando 
DIM. Se isto acontecer, pe- 
gunta novamente. 


200 a 210 -Pergunta quantas matérias 
tem, eentra na variável NM. 


220 - Testa se NM é maior do que 
o permitido pelo comando 
DIM. Se isso acontecer, per- 
gunta novamente. 


286 a 290 -Dá instruções para entrada 
de dados. 


300 -Alça de repetição dos 
alunos. 


310 -Mostra identificação do alu- 


no a ser entrado. 


320 - Alça de repetição das maté- 


rias por aluno. . 
330 a 340 -Pergunta nota. 


350 a 360 -Testa se a nota está entre 0e 
10. Em caso contrário, per- 
gunta a nota de novo. 


440 a 520 -Parte do programa que mos- 
tra as notas na tela. 
Na linha 460, zera o soma- 
dor de notas de um aluno. 
Nalinha 490, efetua esta so- 
ma, e na linha 510 mostra a 
média. 

560 a 640 -Parte do programa que cal- 
cula as médias das matérias. 


Coloque agora o programa no compu- 
tador e teste com os dados da tabela de 
exemplo deste capítulo. 


AE 










plc de resposta na primeira linha): 


É . Quais são os subscritos de linha e 
“ una dos elementos cujo conteúdo é: 


RR a 
oO 
100 Ro PAD dr SERA 
12 Escreva uma declaração DIM para | 
o conjunto DADOS acima. 
Resposta: ed sa. 
1.3. Indique o valor contido nos elemen- 
tos abaixo: 

DADO(2, e a 
RE a 
DADOIDADOC 1),DADO(4,1)): ..... 
DADO(4,DADO(4,1)): 
END. a. 
Ed És 
MM 
MME 
2. Escreva um programa com a alça 
FOR NEXT, para preencher com dados 
os elementos do conjunto DADO (por 
meio de um comando INPUT). 


3. Escreva um programa para preen- 
cher com zeros todos os elementos do 
conjunto DADO. 


4. Explique o que realizam os progra- 
mas abaixo, e qual o resultado mostra- 
do pelo comando PRINT na linha 100, 
tomando como dados o conjunto DA- 
DOS acima: 


4.1. 10 PR=1 
15 LET C=3 
20 FOR L=1 TOS 


4.2. I0LETS=0 
15 FOR I= 2 TO 4 STEP 2 
20 FOR]=ITO 4 
30 LET S=5+DADO(1,)) 
40 NEXT] 
50 NEXTI 
60 PRINT 5 


5. Faça um programa para copiar uma 
das linhas da matriz DADO, para um ve- 


tor (conjunto unidimensional) chamado 
COPIA. 


6. Faça um programa para copiar uma 
das colunas da matriz DADO, para um 
vetor chamado COPIA. 


7. Escreva um programa para preen- 
cher com o valor 1 todos os elementos da 
diagonal principal de um conjunto 
A(10,10). 


Dica: Diagonal principal é o conjunto 
de todos os elementos da matriz que têm 
o mesmo índice de linha e de coluna. 
Por exemplo: os elementos A(1,1), 
A(2,2), A(3,3)... etc. estão na diagonal 
principal 


8. Indique qual o erro nos programas 
abaixo: 


8.1. 10 DIM A(Z,6) 
20 FORI=0TO7 
30 LET A(1,7)=1 
40 NEXTI 


8.2. 10 FOR]=2 TO 100 STEP 3 


15 LET B(J,10)=B(J,1)*2 
20 NEXT] 
30 DIM B(100,10) 


8.3. 10 DIMX (50,10) 
20 FOR 1=1 TO 10 
30 FOR ]=1 TO 50 
tri dim () 
50 NEXTI 
60 NEXT] 


9. Indique se as linhas de programa 
abaixo estão certas (C) ou erradas (E). 
Caso estiverem erradas, explique onde 
está o erro: 

PRINT XX(A +5,10) 

LETC(1;2)=896 

PRINT A218(B5,B5+3 — T*4) 

PRINT CONJ(4,5) 

PRINT B(67000,2) 

PRINT X(3.2,4.55) 
10. Modifique o programa completo de 
cálculo de boletim de notas, da seção 
anterior, de modo a realizar as seguin- 
tes funções adicionais: 


a. Calcular a média global da classe 
(todas as notas). 


b. Indicar, ao lado da média de cada 
aluno, se ela está acima ou abaixo da 
média global da classe. 
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Também podemos programar em BA- 
SIC uma variável conjunta alfanuméri- 
ca. No exemplo dos times, poderíamos 
então armazenar os nomes dos times em 
uma lista, assim: 


25 LET TIMES(1)="PALMEIRAS” 

26 LET TIME$(2)= "SANTOS" 

27 LET TIME$(3)=“"CORINTHIANS” 
28 LET TIME$(4)= "FLAMENGO" 
29 LET TIME$(5)="FLUMINENSE” 


e assim por diante. 


Dimensionar um conjunto literal como 
este é um pouco mais complicado do 


que dimensionar um conjunto numéri- 
co (um vetor). 


Como você deve se lembrar, um cordão 
alfanumérico ("string”) é armazenado 
no coóomputador como uma série de me- 
mórias interligadas. Ou seja, uma variá- 
vel literal simples já é um conjunto de 
memórias. 


Normalmente, podemos encher uma 
variável literal simples com até 255 ca- 
racteres, sem necessidade de usar o co- 
mando DIM (ou seja, é diferente do con- 
junto numérico, que só permite dez ele- 
mentos nessas condições). 





Se usarmos o comando DIM com uma 
variável literal simples, estaremos auto- 
maticamente limitando o número de ca- 
racteres que esta variável irá aceitar. Por 
exemplo: 


10 DIM LETRAS$(10) 
20 LET LETRAS$='ABCDEFG 
MNOPORSTUVXZ” 


HUKL 


Neste caso, o comando 
30 PRINT LETRASS$ 
irá mostrar apenas este resultado (as dez 


primeiras letras foram aceitas no coman- 
do LET da linha 20): 


ABCDEFGHI 
Para dimensionar um conjunto literal, 
portanto, podemos utilizar uma tabela 
como se fosse uma página com várias li- 
nhas de tamanho fixo: 
10 DIM T$(5,15) 


Isso equivale a um conjunto de duas di- 
mensões, organizado assim: 
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O primeiro número entre parênteses 
no comando DIM especifica o número 
de linhas que constam do conjunto, ou 
seja, quantos nomes separados eu pode- 
rei colocar na minha lista. 


O segundo número entre parênteses 
(depois da vírgula) corresponde ao nú- 
mero de colunas que constam do con- 
junto, ou seja, quantos caracteres, no 
máximo, poderá ter cada nome da lista. 


É 
oca 
4 pe a ai 
E iPiAji M|EII 
o. Sta iN TiOIs 
E IejojBi NO 
- | ar 
RR RR o lo de ta 
Es  APILIVUIMILAIN 
ça Ci plo, Cação, O 


Você deve ter notado dois fatos interes- 
santes aqui: 


1. Alinha do começo do conjunto (linha 
0) está vazia. 


2. Sobram espaços em branco depois 
dos nomes dos times, em cada linha, 
se estes tiverem menos do que os 
quinze caracteres dimensionados. 


O primeiro fato pode ser explicado 
porque tínhamos colocado os co- 
mandos: 





Como no caso dos conjuntos numéri- 
cos, existe um elemento (0 que é reserva- 
do automaticamente (você pode usá-lo 
ou não, à vontade). 


A única diferença em relação a um 
conjunto numérico é que não existe a 
coluna numerada zero, ou seja, ela não 
é ocupada por um caractere do cordão. 


Preenchendo com os nomes dos times 
do exemplo acima, teríamos: 





Cena 
RARO 
Soa 
NjT! Ms dl 
Eni jo LL 
EJNISJEL | 4 ol 


25 LET TIME$(1)="PALMEIRAS” 

26 LET TIME$(2)="SANTOS” 

27 LET TIME$(3)= “CORINTHIANS” 
28 LET TIME$(4)="FLAMENGO” 
29 LET TIME$(5)=“FLUMINENSE” 


Mas nada impediria que colocás- 
semos: 


24 LET TIME$(0)="SÃO PAULO” 


E, neste caso, a linha À também seria 
ocupada: 


o» (stajop jRfapoLi TOC 
| CAPIALIMIENITRIAIS! | id 
DEDE al | FR 
» jefojajifnja fu italuis EO 
Jriciajmelnielol PTI 
5 IFÍLIUIM|LINIE|N|S|EL [1 1 


ando nome 
aos bois 
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Vamos refazer agora o programa de 
entrada dos pontos ganhos por time de 
futebol, colocando também os nomes 
dos times. 


Um programa para entrar os nomes 
dos times, por exemplo, seria assim: 


10 DIM TIME$(5,15) 

20 FOR I=1 TOS 

30 PRINT “NOME DO TIME Nº ;1;" 7”; 
40 INPUT TIMES(]) 

50 NEXTI 


Note que o número de subscritos na 
declaração DIM é diferente do número 
de subscritos na declaração INPUT, 
quando se trata de conjuntos de cor- 
dões. Isso não acontece em conjuntos 
numéricos: ambos os números precisam 
ser iguais. 


Podemos aproveitar a alça de entrada 
do programa dos times de futebol para 
colocar também duas linhas que possi- 
bilitem a entrada do nome: 


10 PRINT “CAMPEONATO 
BRASILEIRO DE FUTEBOL' 

20 “TABELA DE PONTOS GANHOS” 

30 PRINT 

35 DIM TIME$(5,15) 

40 REM 

50 REM ::: ENTRADA DE DADOS 

70 REM 

70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 

75 PRINT “PARA CADA TIME DA 
TABELA:” 

80 PRINT 

85 FOR N=1 TOS 

90 PRINT “NOME DO TIME 
NUMERO “;N;* 7”: 

95 INPUT TIMESN) 

96 PRINT TIMES(N) 

98 PRINT “NUMERO DE PONTOS 
GANHOS ?”; 

100 INPUT T(N) 

110 PRINT T(N) 

120 NEXT N 

130 REM 

140 REM ==: CALCULO DA MEDIA 

150 REM | 

160 LET SOMA= 0 

170 FOR N=1 TOS 

180 LET SOMA=SOMA + T(N) 

190 NEXT N 

200 REM 
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210 REM -:=- MOSTRA RESULTADOS 


220 REM 

400 LET MEDIA = SOMA/5 

410 PRINT 

420 PRINT “MEDIA DOS PONTOS 
GANHOS = “MEDIA 

430 STOP 


Eis aqui um exemplo de utilização do 
programa: 


CAMPEONATO BRASILEIRO DE 
FUTEBOL 
TABELA DE PONTOS GANHOS 


ENTRE O NUMERO DE PONTOS 
GANHOS PARA CADA TIME 
DA TABELA: 


NOME DO TIME NUMERO 1 ? 
PALMEIRAS 

NUMERO DE PONTOS GANHOS ? 23 
NOME DO TIME NUMERO 2 ? 
SANTOS 

NUMERO DE PONTOS GANHOS ? 12 
NOME DO TIME NUMERO 3 ? 
CORINTHIANS 

NUMERO DE PONTOS GANHOS ? 9 
NOME DO TIME NUMERO 4 ? 
FLAMENGO 

NUMERO DE PONTOS GANHOS ? 7 
NOME DO TIME NUMERO 5 ? 
FLUMINENSE 

NUMERO DE PONTOS GANHOS ? 4 


MEDIA DOS PONTOS GANHOS = 11 


Você deve estar perguntando à esta al- 
tura: Por que entrar os nomes dos times, 
se eles não são usados em nenhum outro 
lugar do programa? 


Realmente, se for só para informar no 
momento de entrada de dados, é desne- 
cessário entrar os nomes dos programas. 


Porém, uma vez que já temos os nomes 
armazenados no conjunto TIMES, po- 
demos usá-los para outros fins. 


Vamos supor que queremos modificar 
o programa acima, de modo a mostrar 
na tela o seguinte resultado: 





Para fazer isso, tiramos a linha 430 do programa anterior e adicionamos: 


430 CLS 

440 PRINT TAB( 5); "TIME"; 
TAB(15);"PONTOS”; 

450 PRINT Eh “DIFERENCA 
MEDIA 

460 FOR 1=1 TOS 

470 PRINT 1;º. “TIMES(); 
TAB(7) T(D); 'TAB(17);MEDIA - T() 

480 NEXTI 

490 STOP 


A expressão da linha 470 mostra os 
dados de entrada e a diferença dos 
pontos ganhos por cada time, em rela- 
ção à média calculada. 


Portanto, para realizar estetipo de cál- 
culo, bem como mostrar os resultados, é 
necessário usar conjuntos para armaze- 
namento intermediário dos dados. 
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Muitos programas utilizam listas de no- 
mes e outros dados, que podem ser de- 
finidos como fixos, dentro dos mesmos, 
em vez de serem entrados por meio de 


comandos INPUT. 


Em muitos computadores, existem dois 
comandos (READe DATA) que facilitam 
bastante a definição interna detais listas. 
Entretanto, os computadores com a lógi- 
ca SINCLAIR (por exemplo, o TK83, 
TK85, CP200etc., no Brasil) não têm es- 
tes comandos no seu interpretador BA- 
SIC. Por isso, temos que usar algunstru- 
ques e assim contornar essa falta. 


O mais comum, se o número de ele- 
mentos dos conjuntos não for muito 
grande, é defini-los no programa por 
meio de declarações LET. 
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Vamos tomar um exemplo. 


Suponhamos que o dono de uma loja 
de frios queira emitir uma nota de des- 
pesas para cada cliente que efetua com- 
pras na sua loja. Os produtos que ele tem 
para vender são fixos, e podem constar 
do programa. Para cada cliente ele digi- 
ta a quantidade comprada e o preço por 
quilograma da mercadoria. Em segui- 
da, aparece a nota na tela, com o total 
das despesas, bem como o nome e valor 
de cada mercadoria comprada. 


Vamos definir o conjunto M$, que 
contém os nomes das mercadorias, eos 
conjuntos Q e PR, que contêm quanti- 
dade e preço, respectivamente. 


19 CLS 

20 PRINT “EMISSÃO DE NOTA DE 
DESPESAS" 

30 PRINT “CASA DE FRIOS" 
“AZEITONA DOURADA" LTDA” 

40 PRINT 

50 DIM M$(5,20) 

55 DIM TT(S) 

60 LET M&(0)= "AZEITONAS 
PRETAS" 

70 LET M$(1)="AZEITONAS: 


VERDES” 
80 LET M$(2)= "PRESUNTO 
GORDO” 
90 LET M$(3)="PRESUNTO 
MAGRO 
100 LET M$(4)="MOZARELA” 
110 LET M$(5)="QUEIJO PRATO” 
120 REM 
130 REM ***** ENTRADA DOS 
DADOS DA COMPRA ***** 
140 REM 
150 PRINT "DIGITE A QUANTIDADE 
COMPRADA E DEPOIS” 
160 PRINT “O PREÇO POR 
QUILOGRAMA PARA 
CADA MER -” 
170 PRINT “CADORIA APRESENTA: 
DA NA TELA. DIGITE 0" 
180 PRINT "SE O CLIENTE NAO 
COMPROU A MERCADORIA 
190 PRINT 
200 FOR I=1 TO 5 
210 PRINT M$(); “2” 
220 INPUT Q(I) 
230 IF Q(1)= 0 THEN GOTO 250 
240 INPUT PR(I) 
250 NEXTI 
260 REM 
270 REM ***** IMPRESSAO DA 
NOTA dd dd 


280 REM 

299 CLS 

300 PRINT * 
DE DESPESAS” 

310 PRINT 

320 PRINT “MERCADORIA”; 
TAB(17);“"QUANT PRECO” 

325 LET TOT= O 

38 FOR [=| TOS 

340 IF Q(1) = O THEN GOTO 360 

350 PRINT MHCDITAB(I7);O(N); 
TAB(22):O(D*PRO) 

355 LET TOT=TOT + Q(D* PRC) 

360 NEXT 1 

365 PRINT “TOTAL';TAB(22);TOT 

370 PAUSE 600 

380 CLS 

390 GOTO 150 


NOTA 


O comando IF da linha 230 serve para 
testar se a quantidade comprada foi ze- 
ro. Neste caso, o programa não pede o 


preço depois. 


O comando IF da linha 350 testa tam- 
bém se à mercadoria tem valor zero de 
quantidade, e passa para a linha 350 de 
apresentação, neste caso. 





1. Modifique o programa deemimiode 
nota de despesas, de modo a ter as se- 


a. entrar a data de emissão da nota e o 
nome do cliente, para mostrar na tela de 


+ 


b. armazenar o valor total de cada nota, 
DA, e mostrar este valor se o nome do 


2. Modifique o programa de cálculo de 
boletim de notas (página 87 ), afim de 
poder entrar e mostrar o nome de cada 


istas mais 
complexas 


Muitos programas necessitam de 
várias listas alfanuméricas relaciona- 
das entre si. 


Vamos tomar como exemplo o se- 
guinte problema de programação: 


Queremos fazer um programa para 
entrar pelo teclado e armazenar na 


Note que os elementos NOMES (5), 
ENDEREÇOS (5) e TELEFONES (5), 
por exemplo, contêm dados da pes- 
soa nº 5 em nossa caderneta. 


Organizando os dados dessa for- 
ma, será mais fácil programar as di- 
versas funções que caracterizam um 
programa de cadastramento de infor- 
mações, como é o caso da nossa ca- 
derneta de endereços. 


Programas desse tipo têm normal- 
mente as seguintes funções (partes do 
programa que realizam daterminadas 
tarefas em relação aos conjuntos de 


dados): 


- incluir na caderneta os dados de 
uma pessoa; 


AGENDA TK 
CADERNETA DE ENDERECOS 


1 INCLUIR UM NOME 
2 MODIFICAR DADOS 
: INFORMAR DADOS 


DIGITE UM NUMERO: 


memória do computador uma cader- 
neta de endereços de amigos e co- 
nhecidos. (Gostaríamos que neste 
programa os dados relativos a cada 
pessoa fossem armazenadas em listas 
separadas: 


NOMES 


-lista dos nomes das 
pessoas 


ENDEREÇOS -lista dos endereços 


TELEFONES 


“listas dos telefones 


Assim, por exemplo, os dados so- 
bre as pessoas seriam armazenadas 
nos elementos das listas: 





- procurar o telefone ou endereço 
de uma determinada pessoa; 


- modificar os dados de uma pessoa 
(por exemplo, se ela mudou de te- 
lefone ou de endereço). 


Uma forma bastante simples e mui- 
to utilizada de programar a opção do 
usuário por estas funções é um menu. 


Na gíria de computação, um menu 
é uma lista das opções disponíveis de 
processamento dentro de um deter- 
minado programa, apresentada ao 
usuário para que ele selecione uma. 


Em nosso programa, um exemplo 
prático de menu seria: 


«a--........ título do menu 

«a... lista de comandos 

a--........ comando para terminar o 
programa 


b 
a mensagem de solicitação 
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À apresentação deste menu geral- 
mente é colocada logo nó início do 
programa: 


40 CLS 

50 PRINT “ AGENDA TK” 

60 PRINT “CADERNETA DE 
ENDERECOS” 

70 PRINT 

80 PRINT" COMANDOS:” 

907 PRINT id a e e fu e fue pe 


PRINT INCLUIR 
MODIFICAR 


100 PRINT “1 
UM NOME” 
INFORMAR 


120 PRINT “2 
DADOS” 
130 PRINT “3 
DADOS” 
150 PRINT “4 
160 PRINT is — e e eus ums ams <uuss ums aum cus cus cum au caes aa 


170 PRINT 


180 PRINT “DIGITE UM 
NUMERO:” 

190 IMPUT OPCAO 

200 IF OPCAO <1 THEN 
GOTO 190 

210 IF ÓOPCÃO >4 THEN 
GOTO 190 


À linha 190 fica aguardando até 
que o usuário digite um número cor- 
respondente à opção que ele deseja 
executar. 


Ás linhas 200 e 210 testam se o nú- 
mero digitado está situado entre 1 e 4 
(as opções disponíveis). Se for digita- 
do um número diferente destes, o 
programa retornará à'linha 190, até 
que a entrada esteja correta. 


Ã partir daí, a estrutura do progra- 
ma poderá ser a seguinte: 


Apresentação 
do menu 


Explicando: 


Após a escolha do usuário, o pro- 
grama desvia para o segmento apro- 
priado, que irá realizar aquela fun- 
ção. Depois de terminá-la, retorna ao 
início do programa, para apresentar 
de novo o menu (exceto quando o 
usuário escolhe terminar o progra- 
ma). 
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Essa estrutura permite que o usuá- 
rio do programa realize facilmente 
uma série de tarefas, na ordem que 
julgar mais interessante, sem necessi- 
dade de “decorar” comandos por ex- 
tenso ou ser obrigado a seguir uma 
ordem inflexível de processamento. 


Continuando a programação, de- 
vemos dimensionar previamente os 
conjuntos alfanuméricos que serão 
utilizados: 


37 DIM NOMES (50,25) 
38 DIM ENDERECOS (50,25) 
39 DIM TELEFONES (50,10) 


Note que dimensionamos a cader- 
neta para um máximo de 50 nomes de 
25 caracteres cada, mais os endere- 
ços, também de 25 caracteres cada, e 
os telefones, com 10 caracteres cada. 


Portanto, a quantidade de memória 
a ser ocupada por esses conjuntos se- 
rá de: 


50 x 25 + 50 x 25 + 50 x 10 = 
3 000 caracteres 


Portanto, atenção: o programa não 
poderá ser utilizado em microcompu- 
tadores com dois kbytes de memória 
(versão básica do TK 82 e do TK 83); 
apenas em computadores de maior 
capacidade. 


Para armazenar um número maior 
ou menor de endereços, basta alterar 
os valores nos comandos DIM. 


Observe também que cada infor- 
mação tem um limite máximo em nú- 
mero de caracteres, e estes serão 
“podados” automaticamente se ultra- 
passaram esse limite de comprimen- 
to. 


Agora, podemos verificar qual foi 
a opção dada pelo usuário e desviar o 
programa de acordo com o resultado: ' 


250 o ÓPCAÃO = 1 THEN GOTO 
K, 

260 IF OPCAO = 2 THEN GOTO 
am 

270 IF OPCAO = 3 THEN GOTO 


911) 
280 IF OPCÃO = 4 THEN STOP 


Agora, a partir da linha 30, colo- 
camos o setor de eritrada de dados. 
Vamos definir a variável NUM para 
contar o número de endereços arma- 
zenados na caderneta. Inicialmente, 
é claro, ele será zero. À cada entrada 
na caderneta de uma nova pessoa, 
esse número será incrementado por 
mais um: 


300 LET NUM = NUM + 1 

3101IF NUM >25 THEN GOTO 90 
320 CLS 

330 PRINT - ENDERECO NO.” NUM 
335 PRINT * 
340 PRINT "NOME:” 

345 INPUT NOMES (NUM) 

350 PRINT “ENDERECO:” 

355 INPUT ENDERECOS (NUM) 
360 PRINT “TELEFONE:” 

365 INPUT TELEFONES (NUM) 
370 GOTO 40 


A linha 310 tem por objetivo impe- 
dir a entrada de mais de 25 nomes, 
pois assim “estouraria” a capacidade 
dimensionada para os conjuntos. 


À seguir programamos o segmento 
de modificação de dados. Inicial- 
mente mostramos no alto da tela co- 
mo estão os dados da pessoa solicita- 
da, e depois pedimos os dados novos: 


40 CLS 

410 PRINT “ENTRE O NUMERO DO 
REGISTRO A SER 
MODIFICADO:” 

415 INPUT X | 

4201F X<1 THEN GOTO 415 

425 IF X>25 THEN GOTO 415 

430 PRINT 

435 PRINT “ENDERECO NO.";X 


440) PRINT is EE == qo=== 


445 PRINT “NOME:” eia 

450 PRINT “ENDERECO:"; 
ENDERECOS(%) 

455 PRINT “TELEFONE:”; 
TELEFONES(X) 

460 PRINT “NOVO NOME.” 

465 INPUT NOMES(X) 

470 PRINT “NOVO ENDERECO:” 

475 INPUT ENDERECOS(Q) 

480 PRINT “NOVO TELEFONE” 

485 INPUT TELEFONES(X) 

490 GOTO 40 


Finalmente, podemos programar o 
segmento de procura. Nesse caso, O 
usuário deve fornecer o nome da pes- 
soa desejada (exatamente como está 
gravado no conjunto NOMES), e o 
programa procurará: 


50 CLS 

510 PRINT “DIGITE O NOME DA 
PESSOA:”; 

520 INPUT X$ 

530 PRINT X$ 

540 FOR 1I= 1 TO NUM 

550 IF X$< > NOMES() THEN 
GOTO 580 

560 PRINT “ENDERECO:”; 
ENDERECOS(]) 

565 PRINT “TELEFONE:”; 
TELEFONES$() 

570 PAUSE 600 

575 GOTO 40 

580 NEXT I 

594 PRINT “NÃO CONHECO ESTE 
NOME” 

595 GOTO 510 


Se todos os nomes forem testados 
(linha 550) e não for achado o pedi- 
do, o programa avisa ao usuário, 


após terminar a alça da linha 580. 


Temos agora o nosso programa 
completo, com os comentários nos lu- 
gares apropriados: 


PRP PDA DADA SRD O O 


REM * PROGRAMA AGENDA 1.0 * 
REM * PARA LOGICA SINCLAIR  * 
REM * PROGRAMA R. SABBATINI * 
MEM rn 
REM 

LETNUM=0 

37 DIM NOME$(50,25) 

38 DIM ENDERECOS(50,25) 

39 DIM TELEFONES(SO, 10) 


ASSASAS 


40 CLS | 
50 PRINT” AGENDA TK” 
60 PRINT * CADERNETA DE ENDERECOS” 
70 PRINT 
80 PRINT * COMANDOS 
"90 PRINTº dg E 
1% PRINT INCLUIR UM NO | 
120 PRINTº2 MODIFICAR DADOS” 
130 PRINTº3 INFORMAR DADOS” 
150 PRINT"4 FIM” 
160 PRINT" ========================== 
170 PRINT 
172 REM 
174 REM ***** SOLICITAR E TESTAR OPCAO ***** 
176 REM 
180 PRINT“DIGITE UM NUMERO: 
190 INPUT OPCÃO 


200 IFOPCAO<1 THEN GOTO 190 

210 IFOPCAO >4 THEN GOTO 190 

212 REM | 

214 REM ***** DIMENSIONAR CONJUNTOS ***** 

216 REM 

242 REM 

244 REM ***** DESVIAR PARA OPCAO ***** 

246 REM 

250 IFOPCAO = | THEN GOTO 300 

270 IFOPCAO =2 THEN GOTO 400 

280 IFOPCAO =3 THEN GOTO 50 

290 IFOPCAO =4 THEN STOP 

292 REM 

294 REM ***** ADICIONAR NOMES ***** 

296 REM 

300 LETNUM = NUM + 1 

310 IFNUM>25 THEN GOTO 9% 

320 CLS 

330 PRINT “ENDERECO NO.”;NUM 

335 PRINT he =>==========2=="' 

340 PRINT “NOME:” 

345 INPUT NOMES(NUM) 

350 PRINT “ENDEREC 

355 INPUT ENDERECOS(NUM) 

360 PRINT “TELEFONE 

365 INPUT TELEFONES(NUM) 

370 GOTO 40 

380 REM 

382 REM ***** MODIFICAR DADOS ***** 

384 REM 

Am CLS 

410 PRINT “ENTRE O NUMERO DO REGISTRO 
A SER MODIFICADO: 

415 INPUTX 

420 IF X<1 THEN GOTO 415 

425 IFX>25 THEN GOTO 415 

430 PRINT 

435 PRINT “ENDERECONO.";X 

44) PRINT* metem cerne see em peter — o ghererepnio quero arm a dores gs 

445 PRINT “NOME:";NOMES(X) 
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Digite este programa no computa- 


pr PRINT ENDERECO:" Renee | dor e teste-o com vários dados. 
460 PRINT“NOVO NOME: 
"465 INPUT NOMES(X 


W V a tr : 

475 INPUT ENDERECOS Epi Edo 
480 PRINT “NOVO TELEFONE:” | 

485 INPUT TELEFONES(X) 

490 GOTO 40 

492 REM 

494 REM ***** PROCURA ir 
496 REM 


50 CLS | 
“510 PRINT "DIGITEO NOME DA PESSOA:"; 
520 INPUTXS$ 

530 PRINT X$ 

540 FORI=1 TO NUM 

550 IF X$< pen THEN GOTO 580 

555 FOR]=2TO 

560 PRINT' ENDERECO-" : ENDERECOS(T) 

565 PRINT “TELEFONE:”; : TELEFONES(D) 

570 PAUSE 600. 

575 GOTO 40 

580 NEXTI 

590 PRINT "NÃO CONHECO ESTE NOME" 

595 GOTOSI10 





ESA RR ARO CRT II TI A 7 CA TD DES RS O PO E EO CENTRE: ATE SST SSD TDR GAS A NETO PATTI a a cora age e mpeg ra 


atrizes 
alfanuméricas 





Da mesma forma como podemos ter NOMES -lista dos nomes das Nesse novo esquema, teríamos 
conjuntos numéricos bidimensionais pessoas uma matriz (chamada DADOSS, por 
em BASIC, também é possível arrna- exemplo, com 25 linhas, ou seja, uma 
zenar dados literais em conjuntos para cada registro e três colunas, 
desse tipo. ENDEREÇOS lista dos endereços uma para cada campo). 


correspondentes 


Assim, por exemplo, os dados so- 
TELEFONES lista “dos telefones bre as pessoas seriam armazenados 
Essa possibilidade torna-se bastan- correspondentes nos elementos da matriz: 

te útil quando desejamos programar 

listas que têm várias informações re- 

lacionadas, como no exemplo da se- 

ção anterior (caderneta de endere- 
ços). 


Como você verá, a programação 
se torna mais fácil, compacta e gené- 
rica se usarmos uma única matriz de 
dados para representar os diferentes 
campos de informação do nosso ca- 
dastro. 


Como você se lembra, a caderneta 
tinha os seguintes conjuntos para ar- 
mazenamento de dados literais: 
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Organizando os dados dessa for- 
ma, será ainda mais fácil programar 
as diversas funções de cadastramento 
de informações da nossa caderneta 
de endereços. 

Na programação, basta que 
dimensionemos a matriz: 


220 DIM DADOS$(50,3,25) 


Observe que dimensionamos a ca- 
derneta para um máximo de 50 pes- 
soas (registros), com três campos ca- 
da, de 25 registros. O terceiro núme- 
ro da declaração DIM serve para es- 
pecificar o comprimento de cada da- 
do literal nesta matriz, que, nesse ca- 
so, deve ser fixo para todos os cam- 


pos. 


Portanto, a quantidade de memória 
a ser ocupada por esses conjuntos se- 
rá de: 


0x58+50x 25 + 50x 25 = 
3750 caracteres 


Para armazenar um número maior 
ou menor de endereços, basta alterar 
os valores nos comandos DIM 


Podemos, em seguida, definir os 
nomes dos campos, utilizando outro 


conjunto, chamado CAMPOSS. 


36 DIM CAMPOS$(3) 

37 LET CAMPOS$(1) = “NOME” 

38 LET CAMPOS$(2) = 
“"ENDERECO” 

39 LET CAMPOS$(3) = 
“TELEFONE” 


Seguindo a programação do exem- 
plo anterior da caderneta, a partir da 
linha 300, colocamos o setor de entra- 
da de dados. Vamos definir a variável 
] para contar o número de campos em 
cada registro, e que será incrementa- 


da por uma alça FOR...NEXT: 


300 LET NUM = NUM + 1 

310 IF NUM > 25 THEN GOTO 900 
320 CLS 

330 PRINT “ENDERECO NO.”;NUM 


335 PRINT E o a a cu e Cu Cu q aum cum cm cu a ce cum ni 


340 FOR]=1 TO3 

350 PRINT CAMPOS$();":”; 
355 INPUT DADOS$(NUM,)) 
365 NEXT] 

370 GOTO 40 


Compare com o programa ante- 
rior, para verificar como este ficou 
muito mais compacto. 


À seguir, programamos o segmen- 
to de modificação de dados. Inicial- 


mente mostramos no alto da tela co- 
mo estão os dados da pessoa solicita- 
da, e depois pedimos os dados novos. 
Aqui também usamos alças FOR... 
NEXT: 


490 GOTO 40 


Finalmente, podemos programar o 
segmento de procura. 


SU CLS 


400 CLS 910 PRINT “DIGITE O NOME DA 
410 PRINT “ENTRE O NUMERO DO PESSOA:”; 
REGISTRO A SER 520 INPUT X$ 
MODIFICADO:” 530 PRINT X$ 
415 INPUT X 540 FOR [= 1 TO NUM 
4201F X<1 THEN GOTO 415 950 IF X$< > NOMES(I) THEN 
425 IF X> NUM THEN GOTO 415 GOTO 580 
430 PRINT 995 FOR]=2TO3 
435 PRINT “ENDERECO NO.” ;X 560 PRINT CAMPOS$(1,)) 
440 PRINT ETR 565 NEXT J 
445 FOR]=1 TO3 570 PAUSE 609 
450 PRINT CAMPOSS$();":”; 575 GOTO 40 
DADOSS(X,)) 980 NEXT 1 
455 NEXT] 590 PRINT “NÃO CONHECO ESTE 
460 PRINT NOME” 


465 FOR]=1 TO3 
470 PRINT “NOVO ":CAMPOSS$ 
475 INPUT DADOS$(X,)) 

480 NEXT] 


aSns 


25 REM * PROGRAMA R. SABBA 


595 GOTO 510 


Temos agora o nosso programa 
completo, com os comentários nos lu- 
gares apropriados: 


q o ll a 


REM * PROGRAMA AGENDA 1.M *. 
REM* PARA LOGICA SINCLAIR *. 


30 a 


32 REM 
34 LETNUM = 


35 DIM DADOSS(o 3 25). 


36 LET 
39 ns CAMPOS) = = “TELEFONE” 


E) 
50 PRINT” | AGENDA TK” | 
60 PRINT" CADERNETA DE ENDERECOS”. 


70 PRINT 
80 PRINT“ COMANDOS: 
90 PRINT == 222 ee e tia 
100 PRINT"1 INCLUIR UM NOME" 
120 PRINT "2 MODIFICAR DADOS" 
- 130 PRINT'S INFORMAR DADOS” 
150 PRINT "4 FIM” E 
160 PRINT” a é 
Na REM 
CRM REM SOLICITAR E TESTAR OPCAO"*"" 
176 REM e 
180 PRINT“DIGITE UM NUMERO: | 
199 INPUTOPCAO | 
200 IFOPCÃO<1 THEN GOTO 190 
210 IFOPCAO >4 THEN GOTO 190 
212 REM . 
214 REM **** DIMENSIONAR CONJUNTOS tdo 
216 REM 
242 REM | 
| 244 REM **** DESVIAR PARA OPCAO +++ | R 
246 REM 


250 IFOPCAO = | THEN GOTO 300 
270 IFOPÇAO =2THEN GOTO 400 
280 IFOPCAO=3THEN GOTO SO | 
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Digite este programa no computa- 
dor e teste-o com vários dados. 


O mais interessante do programa é 
que ele é bastante amplo, pois se qui- 
'séssemos adicionar outros campos de 
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informação (por exemplo, cidade, 
CEP, data de aniversário etc.), basta- 
ria modificar o dimensionamento da 
linha 220, adicionar os nomes no con- 
junto CAMPOS$ e, em seguida, mo- 
dificar o valor final das alças FOR... 
NEXT, nas linhas 340, 445, 465 e 555. 


TESTE 


10.1. Defina: 


conjunto numérico: 


conjunto alfanumérico: 


10.3. Escreva um programa para realizar a seguinte tarefa: um clube de afi- 
cionados de microcomputadores deseja fazer uma lista de todos os seus sócios, 
na qual conste a idade de cada um e a marca do microcomputador que possui. 
O programa, depois de entrados os dados, informará: 


— o número de sócios que têm microcomputadores marca TK 85; 
— o número de sócios que têm microcomputadores marca Apple; 
— o número de sócios que têm outros tipos de microcomputador; 

— à idade média dos sócios do clube; 

— o nome do sócio mais novo do clube. 


Utilize conjuntos unidimensionais chamados NOMES, IDADE e COMPU- 
TADORES para registrar os dados acima. 


10.4. Seja a matriz abaixo: 


DIM DADOS(2,3) 
() 1 2 3 
4 ENE RS 
à O SR 
Ra E 
o 
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Preencha as caselas da matriz com os dados gerados sucessivamente pelos 
programas abaixo: 


ã. 


10 LET I=0 

20 LET J=2 

30 FOR M=I TO] 

40 LET DADOS(M,M)=1 
50 NEXT M 

60 LET DADOS(2,3) = 1 


70 FOR I=0 TO 2 

80 FOR ]J=Q0 TO 2 

90 IF I=] THEN GOTO 110 
100 LET DADOS(I,)) = 0 
110 NEXT J 

120 NEXT I 


130 LET SOMA = 0 

140 FOR COL =0 TO 3 

150 LET SOMA = SOMA + DADOS(0,COL,) 
160 NEXT COL 

170 PRINT SOMA 


Que valor será mostrado na tela quando o computador executar a linha 170? 


10.5. Escreva por extenso a capacidade, em número de linhas, de colunas e 
de caracteres, dos seguintes conjuntos literais: 


a. DIM LIVROS$(100,50) 
b. DIM X$(12,25,5) 
c. DIM ARR$(1,100) 








C A P Íí 








ESENHANDO 
COM O 
COMPUTADOR 








Você já viu, no capítulo 5 (páginas 
23 a 25), que existem alguns caracte- 
res gráficos que podem ser usados 
dentro de comandos PRINT para fa- 
zer desenhos na tela. 


Assim, por exemplo, podemos de- 
senhar um belo padrão de blocos 
gráficos na tela utilizando o seguinte 


programa: 


IOLET P$="BO4 E" 
20 PRINT P$; 
30 GOTO 20 


Observe que a linha de caracteres 
gráficos armazenados em P$ é forma- 
da pelos seguintes caracteres gráfi- 


3 NA REA 

MN EN, » 

q ARA a 
k 


Você já aprendeu como são digita- 
dos estes caracteres gráficos no pro- 
grama, utilizando a tecla GRA- 
PHICS. 





Quando você executar este pro- 
graminha simples, com o comando 
RUN, aparecerá um padrão gráfico 
repetido, que encherá toda a tela, de 
cima para baixo. 


Para fazer experiências com dife- 
rentes linhas de conjuntos gráficos, 
modifique o programa para aceitar os 
caracteres introduzidos pelo coman- 
do INPUT, assim: 


10 INPUT P$ 
20 PRINT PS; 
30 GOTO 20 


Quando o programa é executado 
pela primeira vez, aparece na tela o 
sinal de prontidão, que avisa ao 
usuário que ele deve digitar uma li- 
nha de literais (caracteres): 





Nesse ponto, você deve pressionar 
as teclas SHIFT e 9, simultaneamen- 
te, para entrar no modo gráfico, e em 
seguida digitar de cinco a nove ca- 
racteres gráficos quaisquer. 


Para dar segúência ao programa, 
saia do modo gráfico, pressionando 
novamente as teclas SHIFT e 9, e de- 
pois a tecla NEW LINE. O mesmo 
efeito pode ser conseguido se você 
ET duas vezes a tecla NEW 


Usando a sua imaginação, você 
poderá “inventar” muitos gráficos di- 
ferentes, fazendo uso de várias ins- 
truções PRINT. 


Por exemplo, vamos fazer um pro- 
grama para desenhar a cara do ET (o 
simpático personagem extraterrestre 
do filme do mesmo nome): 


10 PRINT 
20 PRINT “ [7 
30 PRINT “| | 
49 PRINT “|. 
SOPRINT“| E | 
o RN 





Para fazermos o ET “espichar” o 
pescoço, podemos colocar os seguin- 
tes comandos, dentro de uma alça 


FOR: 


I0FORI=1 TO IO 
80 PRINT " E" 
90 NEXTI 


Veja o efeito interessante causado 
por este programa. 











Uma das coisas mais fascinantes 
que podemos fazer com um computa- 
dor pessoal é um videogame com de- 
senhos que se movem (por exemplo, 
um avião que atravessa a tela de um 
lado para o outro). Esse tipo de técni- 
ca de programação é chamado de 
animação gráfica, pois ela corres- 
ponde à maneira como são produzi- 
dos em filmes os desenhos animados. 


Para aprender a realizar uma ani- 
mação gráfica no computador, pri- 
meiro temos que conhecer mais algu- 
mas características de programação 
da tela de vídeo. 


A tela de: vídeo de computadores 
do tipo TK 82, TK 83, TK 85 etc. pode 
ser comparada a uma folha de papel 
quadriculado, onde cada quadradi- 
nho corresponderia a uma posição 
determinada na tela: 
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Cada posição na tela corresponde 
a um caractere. 


Quando a tela é apagada por um 
comando CLS, ou logo após termos 
digitado o comando RUN, todas essas 
posições estarão em branco. 


Ao encontrar um comando PRINT, 
as posições na tela serão ocupadas 





pelos caracteres enviados por esse 
comando. 


Por exemplo, o programa: 


IZCLS 

20 PRINT 

30 PRINT “ALO” 

40 PRINT TAB (5);"COMO VAI?” 
50 STOP 


vai escrever nas seguintes posições da tela: 





Observe que cada comando PRINT 
faz o processo de escrita deslocar-se 
para a linha seguinte. À função TAB 
serve, no exemplo, para avançar dez 
posições, na segunda linha de im- 
pressão. 


Podemos comparar o esquema de 
posições na tela a uma matriz ou ta- 
bela bidimensional, que você já 
aprendeu no capítulo anterior. 


As linhas da tabela correspondem 
às linhas sucessivas na tela. Elas são 
numeradas de 0 a 21, de cima para 
baixo, começando pela linha supe- 
rior da tela. 


As colunas da tabela correspon- 
dem às colunas de impressão em uma 
“determinada linha. Elas são numera- 
das de 0 a 31, da esquerda para a di- 
reita. 


0123456 78910111213141516171819202122232425 26 2728 2930 3) 


DOIDA N-S 


Na realidade, a tela de vídeo do seu 
computador tem 23 linhas. Mas as li- 
nhas 22 e 23 normalmente não podem 
ser usadas por um comando PRINT. 
Elas estão reservadas pelo interpreta- 


dor BASIC para as seguintes fun- 


ções: 


linha 22: linha de entrada de dados 
(onde aparece o cursor 
» [CL] cada vez que um co- 
mando INPUT é encontra- 

do no programa; 
linha 23: é usada para mostrar men- 
sagens de erro (por exem- 


plo, 6/1060). 


Da mesma forma que em uma ma- 
triz, podemos referenciar cada posi- 
ção da tela de vídeo, por meio dos 
seus índices, ou seja: 


posição da linha 
posição da coluna 


O comando que faz esta referência 
é chamado de AT, e é sempre usado 
conjuntamente com o comando 


PRINT. 
Por exemplo: 


PRINT AT 5,10; "ALO” — escreverá 
a palavra ALO na linha nº 5, 
contando de cima para baixo, e co- 
meçando na coluna 10 desta linha, 
contando da esquerda para a direi- 
ta; 


PRINT AT 20,0; “im” — colocará 
na linha 20, e na coluna (, o carac- 
tere gráfico E. 


AT, em inglês, significa EM. 





Portanto, PRINT AT 2,5 tem o se- 
guinte significado: 


ESCREVA EM 2,5 


O primeiro valor que vem depois 
da palavra AT é o número da linha. 
O segundo valor (que é separado do 
primeiro por uma vírgula) é o núme- 
ro da coluna. 


Esses números não podem ser me- 
nores do que zero nem maiores do 
que o número máximo de linhas ou 
colunas na tela, conforme o caso. 


Por exemplo, 


PRINT AT -2,20 
PRINT AT 2,56 


estão errados, pois, no primeiro 
exemplo, -2 é um número de linha 
que não existe e, no segundo, 56 é 
um número de coluna que também 
não existe. 


Portanto, o comando PRINT AT é 
muito útil, pois permite que escreva- 
mos qualquer coisa (caracteres nor- 
mais ou gráficos), em qualquer ponto 
da tela, como um desenho em uma 
folha de papel. 


Por exemplo, o programa: 
IO PRINT AT 11,14;"MEIO” 


escreverá no meio da tela, aproxima- 
damente, a palavra MEIO: 





Dessa forma, o programa não pre- 
cisa ter várias linhas PRINT, coloca- 
das em uma certa ordem. 


Você vai entender melhor esse 
processo, ao estudar o programa 
abaixo. 

O seu objetivo é escrever os nomes 
dos quatro pontos cardeais ("rosa dos 


ventos” ou bússola), nas quatro bor- 
das da tela, assim: 


E PE MRE] 


| 
| 
| 


6/11: 





À primeira coisa Que você deve fa- 
zer é calcular as posições de linha e 
coluna de cada palavra. 


Uma forma de fazer este cálculo é 
escrever as palavras em um papel 
quadriculado comum, marcado com 
os limites da tela. 

No exemplo acima, teremos: 


palavra nº de linha nº de coluna 


NORTE () 13 
OESTE 1 v) 
LESTE a! 21 
SUL 21 14 


Escolhemos a coluna 13 para a pa- 
lavra NORTE porque a coluna do 
meio é de número 15, e a palavra tem 
5 letras. Assim, ela ficará aproxima- 
damente centralizada na linha nº Q. 
Da mesma forma, escolhemos a colu- 
na 14 para a palavra SUL. 


As palavras OESTE e LESTE serão 
colocadas na linha do meio. Escolhe- 
mos 27 para o nº de coluna da pala- 
vra LESTE porque assim ela ocupará 
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até a coluna nº 31, ficando encostada 
na bordá direita da tela. 


Agora que o trabalho de cálculo 
está feito, escrever o programa é ele- 
mentar: 


I9CLS 

20 PRINT AT 0,13;"NORTE” 
30 PRINT AT 11,0;"OESTE” 

40 PRINT AT 11,27;"LESTE” 
50 PRINT AT 21,14;"SUL” 


Note que não faria diferença, para 
o resultado final, se tivéssemos escri- 
to o programa assim: 


I9CLS 

20 PRINT AT 0,13;"NORTE” 
30 PRINT AT 11,27;“LESTE” 
40 PRINT AT 11,6; “OESTE” 

50 PRINT AT 21,14;“"SUL” 


A única coisa que iria mudar seria 
a ordem em que o computador escre- 
veria as palavras. 


O comando PRINT AT tem outra apli- 
cação muito interessante, para dotar 
seus programas de um aspecto mais 
“profissional”. 


Ão solicitarmos alguma entrada ao 
operador de um programa, seria 
ideal que à mensagem aparecesse lo- 
go acima da linha de digitação (linha 
ne 2a: 





Depois de digitar o nome, quere- 
mos outra mensagem assim: 





Para fazer isso, nada mais fácil: 


10 PRINT AT 21,0;“QUAL E O SEU 
NOME ?” 
20 INPUT NOMES 
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30 PRINT AT 21,0;"QUAL E À SUA 
IDADE ?” 
40 INPUT IDADE 


Note que a segunda mensagem (li- 
nha 30) é mais longa que a primeira 
(linha 10). Por isso, ao ser colocada a 
segunda mensagem na tela, ela enco- 
brirá a mensagem anterior, lá coloca- 


da. 


Entretanto, se ocorresse o contrá- 
rio, isto é, se a segunda mensagem 
fosse mais curta que a primeira, as 
duas se “misturariam” (um pedaço da 
primeira continuaria na tela). Por 
exemplo, o programa 


10 PRINT AT 21,0;"QUAL E O SEU 
NOME ?” 


20 INPUT NOMES 

30 PRINT AT 21,0;"E À SUA 
IDADE ?” 

40 INPUT IDADE 


originaria a seguinte mensagem, 
quando executada a linha 30: 





Para evitar isso, temos antes que 
“limpar” a linha assim: 


25 PRINT AT 21,0;" 


o que é mais rápido do que dar um 
comando CLS (que iria limpar toda a 
tela, inclusive a linha 21). 


Ou, então, colocar alguns espaços 
em branco após a segunda mensa- 
gem, de modo a superpô-los ao espa- 
ço ocupado pelo restante da mensa- 
gem anterior: 


10 PRINT AT 21,0;"QUAL E O SEU 
NOME ?” 

20 INPUT NOMES 

30 PRINT AT 21,0;"E A SUA 
IDADE? * 


40 INPUT IDADE 


m desenho 
animado 





Vamos usar agora o comando 
PRINT AT para fazer uma animação 
gráfica. 


Movimentaremos um aviãozinho 
na tela, fazendo-o voar da esquerda 
para a direita. 


A imagem do avião será obtida por 
meio de uma linha assim: 


PRINT º erva . 


Vamos escolher uma linha da tela, 
por onde voará o avião. Por exemplo, 
a linha 10. 


Para colocar o avião em posições 
sucessivas na tela, vamos utilizar uma 


alça FOR...NEXT, assim: 


IGFOR]=0TO 26 
20PRINTATIOJ;" lim o 
30 PRINT AT 10,):“ b 
40NEXT] 


A linha 20 serve para desenhar a 
imagem do avião, começando na li- 
nha 10, coluna J. 


Assim, como J fica igual a 0, 1, 2, 
3 .... etc., a cada repetição da alça 
FOR, que vai de 10 a 40, a imagem 
do avião será escrita nas posições 0, 
1, 2, 3... etc. da linha 10, dando a 


impressão de locomoção. 


A linha 30 serve para apagar o 
avião da posição J, antes de colocá-lo 
em nova posição. Por isso, são escri- 
tos cinco caracteres em branco, so- 
bre a mesma posição anterior. Expe- 
rimente não colocar esta linha e veja 
o que acontece. 


O limite máximo da alça J (ou seja, 
26) foi definido assim, pois o avião 
tem cinco caracteres. 


Ão executar o programa, você po- 
de observar que a imagem do avião- 
zinho dá a impressão de se movimen- 
tar com rapidez de um lado para ou- 
tro da tela. 


O programa, do jeito que está, já 
dá o máximo de velocidade aparente 
ao avião, se quisermos deslocá-lo 
uma posição de cada vez. 


Para aumentar a velocidade de 
animação na tela, portanto, basta in- 
crementarmos a posição do avião de 
2 em 2 ou de 3 em 3, assim: 


IOFOR]=0TO 26 STEP 2 
20 PRINT AT 10,];" 
30 PRINT AT 10,];“ | = 
40 NEXT] | 


Não podemos usar um número 
muito grande no STEP, entretanto, 
pois o avião “pulará” muito na tela, e 
perderemos o efeito contínuo de ani- 
mação. 


Para diminuir a velocidade do 
avião a operação é mais fácil: basta 
colocarmos uma alça FOR de retardo 
de tempo, entre as linhas 20 e 30 e as 
linhas 30 e 


IDFOR]=0TO 26 
20 PRINT AT 10,];“ 
29FORN=1 TOS 
27 NEXTN 

30 PRINT AT 10,];“ “ 
SFORN=1 TOS 

37 NEXT N 

40 NEXT] 


Madi , 


Se quisermos fazer um programa 
mais abrangente, que nos permita 
entrar dados de velocidade e linha de 
deslocamento do avião, teremos: 


1 CLS 

2 PRINT “O VOO DO AVIAO” 

4 PRINT AT 21,0;“ALTURA 
(DA 20) :” 

6 INPUT ALT 


7 PRINT AT 21,0;"VELOCIDADE | 
po 


10 FOR]=0TO 26 

20 PRINT AT 21-ALT,J;“ malha ' 
25 FORN=1 TO 20- VEL 

27 NEXTN 

30 PRINT AT 21-ALT,:“ ' 
35 FORN=1 TO 20- VEL 

37 NEXTN 

40 NEXT) 

50 GOTO 1 


Note que velocidade e altura são 
respectivamente o inverso de retardo 
e posição da linha na tela. Por isso, 
subtraímos os valores entrados de 
seus valores máximos, para poder- 
mos inverter! 





Faça um programa de animação grá- 
ps bis pi e sr. a 


dona parte de baixo da tela subiremtra- 


| jetória vertical até o topo da mesma. 


Dica: é semelhante ao programa do 


avião, apresentado anteriormente, só 
que o deslocamento é ao longo de uma 
coluna da tela (o número da linha na de- 


claração AT é que muda, diminuindo à 


medida que o foguete sobe). 


rr pr 
tela? 


0 RAND 
20 LET X= INT(RND*30)+1 


] ais gráficos 





O sistema de localização de caracte- 
res na tela de vídeo, usando o comando 


Um ponto qualquer no meio desta 
“grade” ou quadriculado é localizado 
através de suas coordenadas, ou seja, os 
números correspondentes à linha (coor- 
denada vertical) e à coluna (coordena- 
da horizontal) onde está, Para cada par 
de números desse tipo, temos apenas um 
ponto correspondente na tela. O contrá- 
rio também é verdadeiro: para cada 
ponto na tela, temos apenas um determi- 
nado par de coordenadas, e apenas um. 


40 PRINTATIK SS 


Colorins o programa acima em seu 
e do 





"* gota caindo) 


PRINT AT, como você percebeu muito 
bem, corresponde a uma espécie de ma- 
pa ou gráfico com posições horizontais 
e verticais. 


Esse sistema de referência é chamado 
de sistema de coordenadas ortogonais, 
pois os dois “eixos” de referência (o ver- 
tical e o horizontal) são perpendicula- 
res, ou ortogonais entre si: 





O ponto na tela (um ponto nesse sis- 
tema de coordenadas no computador) 
recebe o nome de pixe/. Este termo vem 
do inglês, e significa picture element 

(elemento gráfico). As coordenadas, 

por sua vez, recebem os nomes de orde- 
nada (na vertical) e abscissa (na ho- 
rizontal). 


Já se convencionou chamar de X a 
abscissa e de Y a ordenada de um ponto: 
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() 
1 
x 
3 
4 
5 
6 
Y 


123 


Para quem já conhece o sistema de 
coordenadas ortogonais (também cha- 
mada de cartesianas, em homenagem 
ao seu inventor, o matemático e filósofo 
francês René Descartes), pode parecer 


S-NORGNONIOCO 


Wi 23.456 


Acontece que, por razões de facilida- 
de de programação do controle da tela 
gráfica, como veremos, os idealizadores 
desse tipo de microcomputador preferi- 
ram um arranjo inverso, que às vezes nos 
atrapalha, mas não chega a prejudicar. 





As Gras 


PRINT AT 10,12;" MM * 


a / 


ordenada abscissa 


om is An 


(colunas) 





estranho queo zero do eixo vertical (or- 
denadas) seja colocado na parte de ci- 
ma da tela. Normalmente, nos livros de 
matemática ou de geometria, isto apare- 
ce assim: 





Fe O Oi O MIS AS 





No sistema que vimos até agora (co- 
mando PRINT AT), podemos colocar 
um caractere qualquer (gráfico ou não 
gráfico), em qualquer ponto da tela. 


= 
caractere 





Esse sistema nos permite colocar fa- 
cilmente um texto ou um desenho em 
qualquer ponto da tela. 


Entretanto, ele tem uma desvanta- 
gem: se quisermos fazer um gráfico mais 
detalhado, de modo a colocar na tela 
pontinhos menores, não dá. 


Examinando os caracteres gráficos 
existentes no seu computador da linha 
Sinclair, você verá que eles são forma- 
dos pela combinação de quatro subdi- 
visões de um quadradinho gráfico: 


ar E- ua PE 


Assim, qualquer caractere gráfico 
(excetuando-se os que têm elementos de 
cor cinza) pode ser composto 
preenchendo-se quadradinhos meno- 
res, em qualquer combinação: 





Portanto, podemos concluir que exis- 
te um pixel menor do que caractere, e 
que corresponde a um tamanho quatro 
vezes menor, em área, do que o pixel 
que podemos manipular usando o co- 
mando PRINT AT. 


A linguagem BASIC dos computado- 
res da linha Sinclair tem comandos pa- 
ra manipular diretamente estes pixels 
menores. Com eles fica muito mais fácil 
traçar desenhos mais detalhados. 


Esses comandos são: 


PLOT - para colocar um pontinho na 
tela 


UNPLOT - para apagar um pontinho 
da tela 


O sistema de coordenadas dos co- 
mandos PLOT e UNPLOT consiste em 
42 linhas, ou pontos no eixo vertical 
(ordenadas), e 64 colunas, ou pontos no 
eixo horizontal (abscissas): 





Note que, nesse novo sistema de coor- 
denadas, a posição do eixo vertical é 
mais “correta”, ou seja, semelhante à 
convenção adotada pelo sistema 
cartesiano. 


E muito fácil usar os comandos PLOT 
e UNPLOT. Basta fornecer apenas dois 
valores separados por uma vírgula, os 
quais indicam a ordenada e a abscissa 
do ponto desejado na tela: 


2. variáveis numéricas | 
3. expressões matemáticas 
É claro que podemos misturar no 


mesmo PLOT qualquer um dos tipos 
acima: 


PLOT 0,3 --» traça um ponto na 
abscissa = 0 e ordenada=3 


UNPLOT 5,2 --» apaga um ponto na 
abscissa =5 e ordenada =2 


Os argumentos (valores Xe Y) forne- 
cidos aos comandos PLOT e UNPLOT 
podem ser de três tipos: 


PLOT32 | 


: Etattedos: PLOTX,ABC. - o = 
ES AS PLOT LX) o 
Exemplos: PLOTA+1,B*24+C 

PLOT 2,BC*X 

PLOT 12+CK 

etc. 





pontinhos 








Colocar e apagar pontos (pixels) na 
tela gráfica é bem fácil com a ajuda dos 


comandos PLOT e UNPLOT. 

Experimente digitar, em modo direto 
(isto é, sem número de linha), o seguin- 
te comando: 


PLOT 31,21 


Veja o que aconteceu na tela: 





Apareceu um pixel bem no meio da 
tela de vídeo, ou seja, com as coordena- 
das X=3leY=21. 


Agora experimente apagar este pon- 
to com o comando: 


UNPLOT 31,21 


Veja como o pontinho se apagou! 


Uma brincadeira interessante é repe- 
tir aqui aquele programa proposto nos 
exercícios da última lição, que serve pa- 
ra colocar pixels ao acaso na tela: 


1) RANDOM 

20 LET X= INT(RND*64) 
30 LET Y=INT(RND*44) 
4W PLOT XY 

50 GOTO 20 


Note que o número aleatório sorteado 
para a coordenada X varia entre 0 e 63 
(a função RND nunca atinge 1.0000),e 
entre À e 43 para a coordenada Y. O 
efeito final se assemelha à chuva mo- 
lhando uma calçada! 


Outro programa interessante serve 
para desenharmos qualquer coisa na te- 
la, fornecendo ao programa as coorde- 
nadas dos pontos que quisermos dese- 
nhar, um a um, natela: 


10 REM DESENHOS NA TELA 

20 PRINT AT 21,0;“ENTRE VALOR 
DE X:” 

30 INPUT X 

40 PRINT AT 21,0;“ENTRE VALOR 
DE Y * 


- E azendo retas 





Retas paralelas aos eixos vertical e ho- 
rizontal (ou seja, às bordas da tela) po- 
dem ser traçadas com grande facilida- 
de. Basta dar vários comandos PLOT 
com coordenadas próximas umas às ou- 
tras: se os pontinhos “grudarem” uns nos 
outros, darão a impressão visual de uma 
reta. 

Por exemplo, digite sucessivamente 
os comandos diretos: 


PLOI 31,2] 


PLC 32,2] 
PLOT 33,21 


E veja o resultado final: 





Para não ficar repetindo muitas vezes 
os comandos PLOT, podemos usar os 
comandos FOR...NEXT para traçar uma 
reta: 


10 FOR X=31 TO 33 
20 PLOT X,21 
30 NEXT X 


Veja que o resultado final deste pro- 
grama (após digitarmos o comando 
RUN) é idêntico ao mostrado acima com 
os comandos PLOT sucessivos. Isso 
acontece porque a variável X assume os 
valores 31, 32 e 33, controlados pela al- 
ça FOR, eo valor 21 da vertical é manti- 
do constante. 


Veja este programa para traçar uma 
reta na horizontal, começando em um 
determinado ponto e indo até outro: 


10 REM RETAS HORIZONTAIS 

I5 REM 

20 PRINT AT 21,0/"ENTRE VALOR 
INICIAL DE X :” 

30 INPUTXI | 

40 PRINT AT 21,0;"ENTRE VALOR 
FINAL DE X :” 

50 INPUT XF 

00 PRINT AT 21,0;'EM QUE 
PÓSICÃO HORIZONTAL:” 


70 INPUTY 

80 FORX=XITOXF 
90 PLOTXY 

100 NEXT X 

110 GOTO 20 


Para entender melhor o esquema de 
coordenadas gráficas com os comandos 


1. canto inferior esquerdo 
. canto inferior direito | 


. Canto superior esquerdo 


» to 


. Canto superior direito 


Portanto, para traçar quatro linhas de 
um canto a outro, fazemos: 


10 REM MOLDURA PARA O TK 
20 FOR I=0 TO 63 

30 PLOTLO 

ay PLOT 1,43 

50 NEXTI 

60 FOR J = (0 TO 43 

70 PLOT 0) 

80 PLOT 63] 

90 NEXTI 


À primeira alça FOR...NEXT, que vai 
das linhas 20 até 50, traça simultanea- 
mente as retas na parte de baixo (orde- 
nada (0), e de cima (ordenada 43), res- 
pectivamente. À reta aparece na tela 
porque a variável | assume os valores (, 
1, 2, 3, 4... etc., até 63, “grudando” os 
pontinhos colocados na tela por cada 
instrução PLOT. 


A segunda alça FOR...NEXT, que vai 
das linhas 60 até 90, faz a mesma coisa 
com as duas linhas verticais, situadas 
nas abscissas ( e 63, respectivamente. 


O uso da alça nos dá recursos bem 
poderosos para traçar retas de vários ti- 
pos. Por exemplo, para traçar uma reta 
pontilhada, assim: 


basta “acender” um ponto sim, um ponto 
não, na tela, com a ajuda da instrução 


STEP 
10 FOR I=0 TO 63 STEP 2 
20 PLOT 1,21 
30 NEXTI 


Percebeu? 


PLOT e UNPLOT, vamos fazer um pro- 
grama bem simples, queserve para tra- 
çar uma moldura ao redor da tela gráfi- 
ca (ou seja, quatro traços finos coloca- 
dos nos limites da tela gráfica). 


Os quatro cantos da tela gráfica têm 
as seguintes coordenadas: 


X Y 
o 0. 
6 0 
0 43 
63 43 





EXERRARIAS 


1. Modifique o programa que traça re- 
tas na horizontal, dados os pontos de ini- 
cio e fim, demodo que seja possível tra- 
çar retas na vertical. 


2 Faça um programa para desenhar um 


retângulo qualquer na tela (apenas o 
seu contorno). O usuário deverá forne- 
cer as coordenadas X e Y de cada canto 
da figura. 


3. Faça um programa para desenhar um 
retângulo qualquer na tela. O usuário 
deverá fornecer os seguintes dados: 
coordenadas X e Y do canto inferior es- 
querdo do retângulo, tamanho do lado 
horizontal e tamanho do lado vertical. 


4. Como o programa acima poderia ser 
modificado para preencher completa- 
mente o interior do retângulo (ou seja, 
desenhar um retângulo sólido)? 


5. Faça um programa para traçar uma 
reta em diagonal, indo do canto inferior 
esquerdo ao canto superior direito da 
tela (atenção: este programa tem apenas 
três linhas!) 


6. Modifique o programa que desenha 
pontinhos ao acaso na tela, para pedir ao 
usuário os limites inferior, superior, di- 
reito e esquerdo de um retângulo na te- 
la, dentro do qual serão jogadas os pon- 
tinhos (ou seja, eles não ocuparão a tela 
inteira, como no exemplo dado no 
texto). 


Podemos realizar animações gráficas 
com os comandos PLOT e UNPLOT, 
também. 


Veja este programa para simular uma 
bolinha caindo da parte de cima até a 


gar, permitindo ao usuafio enxergar o 
ponto traçado antes de ele se apagar da 
tela. Se você modificar o valor 10 da li- 
nha 30, poderá alterar esta velocidade 
para mais ou para menos. 


parte de baixo da tela: Mas atenção: o uso do PLOT e UN- 

PLOT para animações gráficas só dá 

Il) FORY=43 TOO STEP-1 bons efeitos quando o desenho a ser tra- 

E 20 PLOT 31Y çado for bem pequeno (poucos pontos). 

30 FOR T=1 TO 10 Caso contrário, o desenho se fará muito 

Kg a sã 40 NEXT T lentamente, bem como a animação grá- 
8 RE E to - E ad 31Y fica (movimento) de suas partes. Para 
8 com desenhos mais complexos é mais ade- 
“aa Ra quado usar o comando PRINT AT con- 
2. À alça que vai da linha 30 a 40 causa juntamente com os caracteres gráficos 


um retardo de tempo, para fazer o pon- disponíveis no teclado, como vimos na 
tinho se deslocar para baixo mais deva- seção anterior. 


TT >>>>———— 


RESPOSTAS AOS EXERCÍCIOS ANTERIORES 





Exercício 2, pág. 80. Modifique o pro- 
grama de cálculo dos pontos ganhos dos 


sultados a diferença entre o número de 
pontos ganhos por cada time e a média 


times, de modo que mostre na tela de re- geral. 
Solução: 
I0PRINT “CAMPEONATO BRASILEIRO DE FUTEBOI” 
20 PRINT “ TABELA DE PONTOS GANHOS” 
25 PRINT *“ VERSÃO 3” 
30 PRINT 
40 REM 
S0REM === ENTRADA DE DADOS 
51 REM 
52 PRINT “QUANTOS TIMES?” 
54 INPUTNT 


70 PRINT “ENTRE O NUMERO DE PONTOS GANHOS” 
75 PRINT "PARA CADA TIME DA TABELA:” 
80 PRINT 

85 FORN=1I TONT | 

90 PRINT “TIME NUMERO ":N;"“ ? ":. 

100 INPUT T(N) 

110 PRINT T(N) 

120 NEXT N 

130 REM 

140 REM === CALCULO DA MEDIA 

150 REM 

100 LET SOMA= 0 

I65CLS 


IZ0 FOR N=1 TONT 

180 LET SOMA=SOMA + T(N) 

190 NEXT N 

200 REM 

210REM === MOSTRA RESULTADOS 

220 REM 

400 LET MEDIA = SOMA/NT 

410 PRINT 

420 PRINT “MEDIA DOS PONTOS GANHOS = ": MEDIA 

422 PRINT 

425 FOR N=1 TONT 

426 PRINT "TIME NUMERO ": N;” = ": T (N); “PONTOS GANHOS. a 
428 PRINT “DIFERENCA DA MEDIA = ”: MEDIAT(N); “* PONTOS” 
429 NEXTI 

430 STOP 
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Exercício 1, pág. 92. Modifique o pro- 
grama de emissão de nota de despesas 
de modo que tenha as seguintes funções 
adicionais: 


a. Entrar a data de emissão danota eo 


Solução: 
IDCLS 


nome do cliente para mostrar na tela 
de emissão; 


b. Armazenar o valor total de cada no- 
ta, cumulativamente em uma variável 
RENDA, e mostrar este valor se o no- 


me do cliente for “FIM”. 


20 PRINT “EMISSÃO DE NOTA DE DESPESAS” 
30 PRINT “CASA DE F RIOS “AZEITONA DOURADA" LTDA” 


32 PRINT 


34 PRINT “DIGITE À DATA DE HOJE: 


36 INPUT DAT$ 
AGPRINT | 
50 DIM M$ (5,20) 
55 DIM TT (5) 


60 LET M$(0)=“AZEITONAS PRETAS” 
7O0LET M$(1)="AZEITONAS VERDES" 
8O0LET M$(2)="PRESUNTO GORDO” 
90 LET M$(3)="PRESUNTO MAGRO” 


100 LET M$(4)="MOZARELA" 


110LET M$(5)="QUEDO PRATO” 


115 LET RENDA= 0 
120 REM 


130 REM dd dd ENTRADA DOS DADOS DA COMPRA dede de de de 


140 REM 


142 PRINT “DIGITE O NOME DO CLIENTE:" 


144 INPUT NO$ 


146 IF NO$="“FIM" THEN GOTO 900 


148 PRINT 


150PRINT “DIGITE A QUANTIDADE COMPRADA E DEPOIS" 
160 PRINT “O PREÇO POR QUILOGRAMA PARA CADA MER- 
170PRINT “CADORIA APRESENTADA NA TELA. DIGITE 0” 
180 PRINT “SE O CLIENTE NÃO COMPROU A MERCADORIA 


190 PRINT 

200 FOR [=1 TOS 
210PRINT MD; ? * 
220 INPUT Q(1) 


230 IF O(1)= 0 THEN GOTO 250 


240 INPUT PR() 
250NEXTI 
260 REM 


bd ***+** IMPRESSÃO DA NOTA ***** 


300 PRINT * “NOTA DE DESPESAS” 
305 PRINT 
307 PRINT "CLIENTE: "; NO$;' DATA:":DATS 


310 PRINT 


320 PRINT “MERCADORIA; TAB(17); “QUANT PRECO” 


325 LET TOI=0 
330 FOR 1=1 TOS 
340 IF O(1)= 0THEN GOTO 360 


350PRINT M$(D; TAB(17); QO(); TAB(22); Q(D*PR() 


355 LET TOT=TOT+Q(U)*PR() 
360 NEXT I 


365 PRINT “TOTAL”: TAB(22); TOT 
366 LET RENDA= RENDA + TOTAL 


370 PAUSE 600 
380CLS 


390 GOTO 150 

800 REM | 

810 REM ***** MOSTRAR RENDA FINAL ****** 

820 REM 

900 CLS | 

910 PRINT "RESULTADO CUMULATIVO = CR$'"-RENDA 
920 STOP 


Exercício 1, pág. 95. Modifique o pro- da coloca espaços em branco nos con- 
grama AGENDA para incluir as seguin- juntos correspondentes); 
tes funções adicionais: 
2 - Listagem de todos os nomes colo- 
cadosna caderneta (dica: coloque um 


1 - Exclusão de um nome da caderneta registro em cada linha da tela, come- 
(dica: o programa solicita o número çando com o número do registro, de- 
do registro a ser excluído e em segui- pois o nome, o endereçoe o telefone). 


Solução (programa da pág. 94 completo): 


IQREM *tttrrerree nn a a 


15 REM * PROGRAMA AGENDA 1.00 * 
20 REM * PARA LOGICA SINCLAIR .* 
25 REM * PROGRAMA: R. SABBATINI * 


S0REM ********+ ACTA RRLARTAA A A 


32 REM 
33 REM 

34 REM ***** DIMENSIONAR CONJUNTOS ***** 

35 REM 

36 DIM NOMES$(5025) 

37 DIM ENDERECOS(5025) 

38 DIM TELEFONES(SQ 10) 

40CLS | 

SO PRINT“ AGENDA TK” 

60PRINT “ CADERNETA DE ENDERECOS” 

70PRINT 

80 PRINT COMANDOS: 

OQ PRI Pecannesapanaçess--ss=>>0.0 5" 


100 PRINT “1 INCLUIR UM NOME” 
I20PRINT'"2 MODIFICAR DADOS” 
I30PRINT'3 | INFORMAR DADOS” 
150 PRINT “4 É 


172 REM 

174 REM ***** SOLICITAR E TESTAR OPCAO ***** 
176 REM 

180 PRINT “DIGITE UM NUMERO: 

190 INPUT OPCAO 

2001F OPCÃO <1 THEN GOTO 190 

2101F OPCAO >6 THEN GOTO 190 

242 REM 

244 REM ***** DESVIAR PARA OPCAO ***** 
246 REM 

2501F OPCAO =1 THEN GOTO 300 

2101F OPCAO =2 THEN GOTO 400 

280 IF OPCAO =3 THEN GOTO 500 

284 IF OPCAO =4 THEN GOTO 600 

286 IF OPCAO =5 THEN GOTO 700 


111 


112 


EA OPCAO =6 THEN STOP 


R 
294 REM ***** ADICIONAR NOMES ***** 
296 REM 
300 LET NUM=NUM+1 
3101F NUM > 25 THEN GOTO 900 


320CLS 
330 PRINT “ENDERECO NO; NUM 
335 PRINT * pega RSS 
340 PRINT "NOME: 
345 INPUT NOMES(NUM) 
350 PRINT “ENDERECO: 
355 INPUT ENDERECOS(NUM) 
360 PRINT “TELEFONE: 
365 INPUT TELEFONESNUM) 
370 GOTO 40 


380 REM 
382 REM ***** MODIFICAR DADOS ***** 
384 REM 


400CLS 

410 PRINT "ENTRE O NUMERO DO REGISTRO A SER MODIFICADO:” 
415 INPUT X 

420IF X<1 THEN GOTO 415 

425 IF X>25 THEN GOTO 415 

430 PRINT 

ppp PRINT “ENDERECO NO.';X É 
445 PRINT “NOME: ";NOMES() 

450 PRINT “ENDERECO: “ENDERECOSX) | 
455 PRINT “TELEFONE: TELEFONES(X) 
460PRINT “NOVO NOME:” 

465 INPUT NOMES(%) 

470 PRINT “NOVO ENDERECO:” 

475 INPUT ENDERECOS(X) 

480 PRINT “NOVO TELEFONE: 

485 INPUT TELEFONES(X) 

490 GOTO 40 

492 REM 

494 REM ***** PROCURA DADOS ***** 
496 REM 

S00CLS 

510PRINT “DIGITE O NOME DA PESSOA”; 
520 INPUT X$ : 


540 FOR 1=1 TO NUM 

S50IF X$< > NOMES(I) THEN GOTO 580 
560 PRINT “ENDERECO:”;ENDERECOS(]) 
565 PRINT “TELEFONE:";TELEFONES(]) 
570 PAUSE 600 

575 GOTO 40 


S80NEXTI 

590 PRINT “NAO CONHECO ESTE NOME” 
595 GOTO 510 

600 REM 

OLOREM +" LISTA DADOS **"* 


630 CLS 

640 FOR I=1 TON 

650 PRINT NOMES): * " ENDERECOS(]);" ":TELEFONES(]) 
660 NEXT 

670 PAUSE 600 

680 GOTO 40 

700 REM 

710REM ***** MODIFICAR DADOS ***** 

120REM 


730CLS 
740 PRINT “ENTRE O NUMERO DO REGISTRO A SER SUPRIMIDO:" 


750 INPUT X 

7601F X<1 THEN GOTO 415 
TIQIF X>25 THEN GOTO 415 
780 LET NOMES(X) =" " 

790 LET ENDERECOS) =" " 
800 LET TELEFONE$SQO) =" " 
900 GOTO 40 


Exercício 1, pág. 104. Faça um programa 
de animação gráfica para fazer um fo- 
guetinho desenhado na parte de baixo 
da tela subir em trajetória varal até o 
topo da mesma. 


Solução: 


IGFOR L=22 TO 1 STEP-1 
20 PRINT AT 1,15; Pla” 
30 FOR ]=1 TO 20 
4QNEXT] 
SPRRINTATLIS 
60 NEXT-L 


Exercício 3, pág. 104. Modifique o pro- 
grama do Exercício 2 da página 104 pa- 
ra colocar um máximo de ID asteriscos 
na tela. 


Solução: 


I0RANDOM 

15 FOR 1=1 TO 100 

20 LET X=INT(RND*30)+1 
30LET Y=INT(RND*20)+1 
40 PRINT AT Y,X;"*” 
SONEXTI 


Exercício 4, pág. 104. Faça um programa 
para desenhar uma torneira na parte su- 
perior da tela, e que fique pingando go- 
tinhas de água continuamente (anima- 
ção gráfica da gota caindo). 


Solução: 


IOPRINT AT1, 10;” 
20 PRINT AT 2, 10;” 
30 FOR 1=3 TO 20 
40 PRINT ATI 10;” BM * 
0 FOR ]= 1TO 20 
OONEXT] 
JOPRINTATLIO;”  ” 
S0NEXTI 


90 GOTO 30 






Exercício 1, pág. 107. Modifique o pro- 
grama que traça retas na horizontal, da- 
dos os pontos de início e fim, de modo 
que seja possível traçar retas na vertical. 


Solução: 


I0REM RETAS VERTICAIS 

15 REM 

20PRINT AT 21,0; ENTRE 
VALOR INICIAL DE Y :* 

30 INPUT YI 


- 40 PRINT AT 21,0;"ENTRE 

VALOR 
FINAL DE Y :” 

50 INPUT YF 

60 PRINT AT 21,0;"EM QUE 
POSICAÃO VERTICAL :” 

70 INPUTX 

80 FOR Y=YITOYF 

90 PLOTXY 

I00NEXT Y 

NOGOTO 20 


Exercício 2, pág. 107. Faça um programa 
para desenhar um retângulo qualquer 
na tela (apenaso seu contorno). O usuá- 
rio deverá fornecer as coordenadas X e 
Y de cada canto da figura. 


Solução: 
10 REM RETANGULOPARÃO 


TK 

20PRINT “ENTRE 2 POSI- 
COES PARA LADOS HORI- 
ZONTAIS:” 

30 INPUT Y1 

AM INPUT Y2 

S0PRINT "ENTRE 2 POSI- 
COES PARA LADOS VER- 
TICAIS:" 

60 INPUT XI] 

70 INPUT X2 

80CLS 

90 FOR X=X1 TO X2 

100 PLOT XY1 

110 PLOT XY2 

120 NEXT X 

130 FOR Y=Y1 TO Y2 

140 PLOT X1Y 

150 PLOT X27Y 

“160NEXTY 


Exercício 3, pág. 107. Faça um programa 
para desenhar um retângulo qualquer 
na tela. O usuário deverá fornecer os se- 
guintes dados: coordenadas X e Y do 
canto inferior esquerdo do retângulo, ta- 
manho do lado horizontal etamanho do 
lado vertical. 


Solução: 
10 REM RETANGULO PARA O 


TK 

12PRINT “COORDENADA X 
DA ORIGEM:” 

14 INPUT XI] 

I6PRINT Da + á 
DA ORIGEM:” 

18INPUT Y1 

20PRINT "TAMANHO DOS 
LADOS HORIZONTAIS:” 

30 INPUT H 

S0PRINT “TAMANHO DOS 
LADOS VERTICAIS: 

60 INPUT V 

S0CLS 

90 FOR X=X1 TOXI+H 


I00PLOT XY1 
IIDPLOT XY1+V 

120 NEXT X 

130 FOR Y=Y1 TO Y1+V 
140 PLOT X1Y 

150 PLOT X1+HY 

160 NEXT Y 


Exercício 4, pág. 107. Comoo programa 
acima poderia ser modificado para 
preencher completamenteo interior do 
retângulo (ou seja, desenhar um retân- 
gulo sólido)? 


. Solução: 
Ny) am RETANGULO PARA O 


I2PRINT "COORDENADA X 
DA ORIGEM: 

14 INPUT XI 

I6PRINT "COORDENADA Y 
DA ORIGEM: 

1I8INPUTY1 

20PRINT TAMANHO DOS 
LADOS HORIZONTAIS:” 

30 INPUT H 

S0PRINT "TAMANHO DOS 
LADOS VERTICAIS:” 

60 INPUT V 

S0CLS 

90 FOR X=X1 TO X1+H 

IS0FÓOR Y=Y1 TOY1+V 

140 PLOT XY 

1I60NEXT Y 

IZONEXTX 


Exercício 5, pág. 107. Faça um programa 
para traçár uma reta em diagonal, indo 
do canto inferior esquerdo ao canto su- 
perior direito da tela (atenção: este pro- 
grama tem apenas três linhas!) 


Solução: 


10 FOR I=0 TO 40 
20PLOTI,1 
S0NEXTI 


Exercício 6, pág. 107. Modifique o pro- 
grama que desenha pontinhos ao acaso 
na tela para pedir ao usuário os limites 
inferior, superior, direito e esquerdo de 
um retângulo na tela, dentro do qual se- 
rão jogados os pontinhos. 


Solução: 


19 RANDOM 

IS FOR 1=1 TO 100 o 
20 LET X=INT(RND*30)+1 
30 LET Y=INT(RND*20)+1 
40 PRINT AT YX;"" 

S0 NEXT 1 
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RESPOSTAS AO TESTE ANTERIOR 


Teste 3, pág. 98. Escreva um programa - O número de sócios que têm micro- 
para realizar a seguinte tarefa: um clube computadores marca Apple; 
de aficionados de microcomputadores - onúmero de sócios que têm outros ti- 
deseja fazer uma lista de todos os seus só- pos de microcomputador; 
cios, na qual conste a idade de cada um - à idade média dos sócios do clube; 
eamarca domicrocomputador que pos- - onome do sócio mais novo do clube 
sui. O programa, depois de entrados os | 
dados, informará: Utilize conjuntos unidimensionais 
- O número de sócios que têm micro- | chamados NOMES, IDADE e COMPU- 
computadores marca TK-85; TADORS para registrar os dados acima. 
Solução: 
20 REM CADASTRO DO CLUBE 
30 REM PARA TK-85 
50 REM ; 
60 DIM NOMES$(20,20) 
70 DIM IDADE(20) 
8y DIM o A, 12) 
90 LET SOCIOS = 
100 REM 
110 REM ***** ENTRADA DE DADOS ***** 
120 REM 
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130 PRINT "ENTRADA DOS DADOS DOS SOCIOS” 
140 PRINT “PARA TERMINAR DIGITE *” 
150PRINT 


I69CLS | 

170 PRINT "SOCIO NO”;SOCIOS + 1 

180 PRINT AT 21,0;"NOME DO SOCIO:” 

190 INPUT NOMES(SOCIOS + 1) 

200 IF NOMES(SOCIOS + 1)="*” THEN GOTO 300 
210LET SOCIOS=SOCIOS+1 

220 PRINT “IDADE DO SOCIO:” 

230 INPUT IDADE(SOCIOS) 


' 240PRINT "COMPUTADOR QUE TEM: 


250 INPUT COMPUTADORS(SOCIOS) 
260 GOTO 160 
270 REM 
280 REM ***** PESQUISAS ***** 
REM dl 


290 

300 LET TK85=0 

310LET APPLE= 0 

320 LET SOMA = 0 

330 LET MENOR =99 

340 FOR 1=1 TOSÓOCIOS 

350 1F COMPUTADORS(I) ="TK-85” THEN LET TK85=TK85+1] 
3601F COMPUTADORS(1) ="APPLE" THEN LET APPLE=APPLE+1 
3701F IDADE(I) (MENOR THEN LET MENOR =1 7 
380 LET SOMA=SOMA +IDADE(1) 

390 NEXT 1 

400 REM 

pas REM dd dd RESULTA DOS dk 

430 PRINT "SÓCIOS COM TK-85=";TK85 

440 PRINT “SOCIOS COM APPLE=",APPLE 

450 PRINT “OUTROS COMPUT. =":SOCIOS-APPLETK8S5 

460 PRINT 

470 PRINT IDADE MEDIA="":SOMA/SOCIOS 

prio indo “SOCIO CACULA=":N ici Didi 
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